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Fealure Program 



Printer Tip 




A printer is an extremely useful tool for 
any compuicr user. Indeed, having a 
computer system without a prin te r i s almost 
like having a pen but no paper mo write on: 
You can create in your mind the world's 
greatest novel, but you can^t sell it So the 
book stores unless you can write il down. 
The same goes far artwork. If you have no 
canvas, it doesn't matter how big your 
palctle is or how many brushes you have, 
(Though my children don '1 seem to let this 
hold them hack — sigh,) 

The Color Computer's screen makes an 
exce I lent can vas for graphics creations . But 
just try to take that baby on the road (talk 
about a hernial. Computer users often rd\ 
on their printers to finable [heir work so 
ihey can share it wit It othe rs or s i mply have 
a permanent copy lor themselves. To do 
this we need some way to get our creations 
on paper, and this is when a screen-dump 
program comes in handy. 

Simply pul. a screen dump is a program 
program comes its handy. 

Simply put* a screen dump is a program 
that prints a hardcopy of whatever is on the 
screen. This may include text and/or graph- 
ics N11 ill- 1 Ml CoCVs Il-m and graphics 
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screens are handled sepa- 
rately, most screen-dump 
programs for the CoCo are 
designed to handle one or the 
other. However you can 
always use a graphics editor 
to draw text on the graphics 
screen* so the programs we'll 
look at here are designed to 
print graphics images. Fur- 
ther* the programs presented 
here arc written for the 
PH0DE4 graphics screen. 

Languages and Speed 

In his 19&8 series "Ma- 
chine Language Made BA- 
SIC" {THE RAINBOW* July 
1988 through July 19R9). Bill 
Nee describes several aspects 
of assembly-language pro- 
gramming and makes it easy 
tor the novice ML program- 
mer to get started. In the third 
installment in thai series 
(September 1988, Page 98 k 
ht: presL-rited I wo programs 



designed to dump the PMDDE4 graphics 
screen lo a Tand y printer. The first program 
is written in BASIC and uses the PPOlNT 
function to test each pixel on the screen to 
determine if it needs to be printed. The 
second version is in machine language. 

When that article was published, I was in 

dire need of a PM0DE4 screen-dump utility 

for the HP LaserJet printer we use here. 

Knowing that machine-language programs 

See PMQDE on Page 12 



OnTheFastTracfc 

The HP DeskJet 
and the CoCo 



Color Computers in our home get a lot of 
use: We write letters and reports, de- 
sign graphics images, even play a few 
games. Simply put, we love our CoCos — 
though ai times we wondered if we needed 
to "upgrade" to a more popular computer 
system. 

The biggest problem we encountered 
was the rather limited output capabilities of 
the dot-matrix printer we used. This sum- 
mer one of my sons used Max-t&Sa write a 
novel that was over 1 00 pages in icngih. 
Now* it lakes about seven minutes to print 
a Mtix-iO page with our DMP-105* so he 
lied up the computer for hours and hours. 
Besides* we got tired of listening to the 
whining bzzzt-bzzzl-bzzzl noise Uiis graph- 
ics printing caused* 

We decided there must be a better way. 
ics printing caused. 

We decided there must be a better way. 
Although we saw that laser printers were 
corning down in price, they appeared lo be 
incompatible with the CoCo software we 
use. And we received many blank stares 
from computer sales people in the stores we 
visited when we told them we use Color 
Computers. (I doubt we are the only CoCo 
users to experience this. They always say, 
" 'A what?" Then they proceed to tell us that 
we need to upgrade to one of the new 
"whiz-bang" computers, which just happen 
to be on sale for only a few thousand dol- 
lars. "No thanks. We still love the CoCo*" 1 
reply, and I leave feeling lonely*) 

See HP DsskJsi on Pags J 6 
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The CoCo Carries On 

The wa> most of you probably reach 
decisions is incremental in nature — you 
con.e up with some tacts, think of some 
answer, then apply more and mure facts at 
you go along, adapting your decision until 
vou think you have made a good choice. 
This is how I do things, tow. 

I have licen moving toward thisdeei si on 
(actually a recommendation) for a number 
of months now Those ol vou who make it 
a habit to read this, space will probably be 
able to think back about the things I have 
Ivrri \ciyiiit: ;uul lv able to "see it coming " 
But it hasn'i been an easy road to tollow. 
and you certainly do not have to follow it 
with rae. Here is what I think: 

There is no Color Computer TV, and 
there never will be. The efforts of several 
third-pally companies to entice those of" 
you who \\.m\ mow power and abilities 
from you r Cot 'o -based (or. more corrcc fly. 
Motorola processor- based I platform by 
selling you a "new" computer will nntwrve 
you well into the future. 

The reason for this is simple: software. 
Other titan the PC platform, there is proba- 
bly no single type of computer in the history 
of the industry thai has enjoyed as wide a 
base of third-party support as the Color 
Computer. Compare this to what is avail- 
able for Ihe baste ,i CoCo IV" machine, and 
die resull is almost laughable. 

Moreover, I don "I believe there will ever 
be any large body of software support for 
Ihe new machines. Yes. there will be de- 
buggers and assemblers; a word processor 
and perhaps a desktop publisher; a spread- 
sheet and a communications package. Bui 
five or six of each frotn which to choose? 
Never. Never ever. 

What has made the CoCo market so 
interesting and so much fun isihat there are 
bunches and bunches of software, indeed* 
much of the fun has always been the very 
intense debates owners would have with 
each other over which spreadsheet is the 
best, which game is more fun. which utili- 



ties are the most helpful. The re have been — 
and still are in the world of CoCo — many 
options from which to choose. 

This is not so in ihe world of the "CoCo 
IV - while some systems have had some 
applications ilcvelo|xd for litem, the choices 
bc few and far between. Based on every- 
thing I've seen* J do noi feel this will change 
in the years to come. 

For this reason, I cannot in good cow- 
science recommend that you step "up" to 
any of the iSSxhk computers. While we will 
most likely lose some advertising do liars by 
tak i ng ih is editorial posit ion . there is no way 
we can support these products. I simply do 
n ol be I ie ve t hey are I he best answer for you . 
our readers, for the future. 

As I mentioned in this space a couple of 
months ago* we intend to continue our cov- 
erage of irue CoCo systems. We'll Jo this 
because we believe (he inieColorCompulcr 
system is the most versatile, best -supported 
and greatest home computer available to- 
day. Yes* today. For the price, nothing 
touches ihe CoCo. Nothing. 



w. 
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CoCo market so 
interesting and so 
much Tun is that there 
art bunches ^nd 
hunches nf software 



I have also written here before that as 
I ong as V ou are doing w h at you wan t to do — 
be it desktop publishing, word processing, 
database management or other things — 
with your Color Computer, there is abso- 
lutely no reason to go out and buy something 
else. The CoCo was so far ahead of its time 
for so many years lhat we in the CoCo 
Community were fortunate enough to be on 
technology's leading edge. The truth is, we 
still urc in terms ol functionality. No, we do 
not have quite the jazzy interfaces of the PC 
Windows environment. But we do have some 
really nice stuff. And it will work very well 
for you today. 

Now ] don't mean to confuse the issue. 
You cannot compare the CoCo w r ith a PC 
that has a 386 or 486 processor. No one ever 
implied you could. But neither can you 
compare ihe price difference or the cost of 
software between a CoCo and a 486-based 



computer. 

Your CoCo is a good computer. If you 
really want of need to buy something new, 
however, my recommendation is that you 
buy an Intel-based PC. Tandy has some 
excellent ones — and. by the time you read 
this, will be selling some incredible ma- 
chines at incredible prices. Go out and buy 
one if you want. But don't expect an "in- 
credible" price in the PC world In be any- 
thing as low as what it has cost you to gear 
up your Color Computer. 

If you do decide to emeriti yourcomput- 
ing abilities with another machine. I think 
you should slay involved in Ihe CoCo 
Community. At home, my CoCo sits right 
beside my PC, I use my Color Computet 
for a lot of reasons — for simplicity, for 
ease of programming, and for just plain 
fun. You can loo. And if you have children, 
there is no heller way to get them involved 
in computing than with the Color Com- 
puter. 

One final thing: If you are a subscriber 
lo the RAINBOW, we're offering you a 
special low price on a subscription to oar 
PC publication, PCM. Just give us your 
RAINBOW subscription number and you 
can receive PCM for only $28 a year - — a 
substantial discount off the regular sub- 
scription price of $34. 

I am under no circumstances suggest- 
ing you give up on your Color Computer. 
I have not given up on mine and do not 
intend lo do so, Bui if you're looking for 
room to grow, I suggest you choose a 
fotiTse mho the world ol MS DOS and 
Windows — not lo a new "CoCo Hr -iype 
machine that will never have the software 
base you are used lo having for the Color 
Computer. 



Now is the time to subscribe to hie 
RAINBOW; ihe June issue will not appear on 
the newsstands, As stated in previous col- 
umns, we have been eon side ring for some 
months maki ng it ik R A [ N bow avail able by 
susbcription only. 

Wc do understand some readers faith- 
fully purchase their copies of the magazine 
from the newsstands — and we appreciate 
your support. Ensure your continued en- 
joyment of THE RAlNBOW's benefits by 
taking advantage of the subscription card 
in this issue. 



-Lonnie Falk 




Letters to the 
RAINBOW 



Stronger Support 
Editor; 

Accolades lo CoCo PRO! and Coless 
Computer Design, I have dealt with hoth 
these companies several limes, and they are 
excel lent. Come on guys and gals, Eel's 
support them and subscribe to the RAIN- 
BOW; let ' £ get thi s magazine back to whe re 
ii was — thicker* 

Does anyone know where 1 can get a 

head-ill ignmenl program for my disk drives? 

Vent Sfldoway 

216-Sth Avenue South 

Yorkton,SKS3tfMl 

Canada 



EZWriUrFix 

Editor: 

Here's a tip for readers who bought the 
EZWritt't word-processing program (Ver- 



sion 5 ) on tape from EZ Friendly Software: 
As you arc probably aware, one of the pro- 
gram's flaws is that it doesn't allow you to 
save (.and therefore edili a letter if you have 
included a return address. However, this is 
easily fixed by extending Line 55 with the 
following: 

:PRIMT:PRINT"Pres5 any key to co 
nt1nue.*:EXEC 44539 

Syd Tash 

Les Belles Dentelles, Enr. 

11J69 Victoria 

Montreal PQ H1B2P8 

Canada 



Dynacaic: On the Line 
Editor; 

I have Dynamic, though I seldom use ii 
because of the double-spaced printout it 
produces, I understand I here is a patch to 
alter this. I would appreciate it if you could 
point me in the right direction. 

J know thill repealing articles sometimes 
bothers the "experts." but when I was pro- 
disrriiL' ami developing burning materials. 
we quickly learned that the average person 



gains more knowledge and becomes a bel- 
ter user when the material is presented 
seveiaJ limes. 

Bill Morrissean 

P.O. Box 113 

Bridgton, ME 04009^0113 

You are right. There is a patch to Dy- 
nacaic (OS-9 version) that eiimtnatcs the 
extra iinefeed. Use mod patch or debug to 
make the following changes to dynacal c; 
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Hear. Hear for OS-9 
Editor' 

Thank you for the great OS-9 programs 
included un RAINBOW DN DISK Ihe last few 
rnomhs. View, ProcGen, Ar. Sep. KSDos 
and SuperC&ttm arc just some irf the pro- 
grams I really liked. 

[ was a member of Delphi for several 
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years, and 1 downloaded some BASIC pro- 
grams. Bui 1 was never comfortable there, ] 
never downloaded any OS-9 programs be- 
cause I didn't have an QS-9 terminal pro- 
gram. 1 am a senior citizen, and my CoCo 
has given me a wonderful way To spend my 
days, I struggled with OS-9 for a longtime, 
but 1 am beginning to be more at home with 
it. And I love it. 

It is wonderful that some programmers 
give you permission to provide their pro- 
grams on the disk. I hope you continue to 
pursue this and to make available more of 
the OS-9 shareware that is on Delphi. One 
program I always wanted to get is Shell+. 
All of us died-in-the-wool CoCo owners 
wish your magazine a long life, 

Marie Bonder 

63 Telbar Street 

Springfield, MA 01 I2X 



Modem Corrections 
Editor: 

You and yogr aM^Jciatcs are to be com- 
mended for the telecommunications article 
that appeared in the March 1992 issue of 
THF RATNttOW. The subject of telecommu- 
nications is a complex one. The article 
covered the subject very well in u readable 
and understandable style. 

It is unfortunate that you did not Lest the 
Zoom \ f 32 Turbo modem with another 
modem having similar capabilities* and with 
an appropriate protocol. To make a valid 
test of modems with V.42/V.42fris capa- 
bilities, which are a major feature of the 
Zoom Turbo V.32 (and of (he Zoom 2400 
V.42), it is essential to use a transfer proto- 
col that does not u?>e software error correc- 
tion. You should use a protocol such as 1 K- 
Xmodem-G. Ymodcm-G, or Imodem, all 
of which are available with Prwomm and 
other terminal software packages. If you 
use a protocol relying on software error 
correction with VA2JV.42bis modems, you 
win suffer a severe drop in throughput. 

The primary error-correction method in 
the V.42 standard is the LAPM (Link Ac- 
cess Procedure for Modems). MNP I -4 is 
included as an appendix to the standard but 
i s very much part of the standard . A modem 
that is compliant with the V.42 standard 
must include both protocols fas do the Zoom 
240(1 V.42 and V.32 Turbo modems). 

The WAlbis standard uses the LAPM 
data-compression protocol. The two Zoom 
models mentioned also include MNP-5 data 
compression. Both modems automatically 
negotiate the highest common error correc- 
tion and data compression when connected 
to another modem. 

Thanks again for a great article and al- 
lowing me to participate in the project. 

Oilman Shattuck 

Granite Computer Systems 

571 Center Road 

Hillsboro. NH 03244 



Home Run From a Switch Hitter 
Editor: 

The November I9MI installment of 
"CoCo Consultations" included a descrip- 

hoiiof using s wit ehiii ji jjowlt supplies with 

a CoCo 3 . 1 fol I owed the out I ined proced u re 

with great success. Marty, year instructions 

were clear and everything worked great, 

incl uding the audio and TV out p ut , Thank si 

"I itnothv Eadden 

5522 West John Cabot Road 

Gtendale,AZK5308 



Lending a Helping Hand 
Editor: 

I used the CoCo 3 for several years, ac- 
cumulating five of these wonderful little 



beasts. I also acquired several programs 
and lots of hardware. But alas. I decided to 
switch to MS-DOS — 1 needed the extra 
power and storage for my business. 

All was not lost, however. I found a 
wonderful way to keep all those CoCo 3's 
in use and help my fellow humans at the 
same time. 1 donated all of my CoCo 3 
equipment to the Louisiana Baptist Chil- 
dren T Ji Home. Just as I was introduced to 
computing through the CoCo 3 T a whole 
new group of computer users will be h too. 

If any of you have spare equipment (or 
shareware or public -domain software) that 
can be used with the CoCo 3, the kids at the 
Louisiana Baptist Children's Home could 
sure use it. You can contact the Home at 
P.O. Box 4196, Monroe, LA 7121 1; (31 K) 
343-2244. The LPS address is 7200 De- 
Siard Road, Monroe, LA 71203, 

Steve Vise 

13045 Florida Blvd. West 

Walker, LA 70783 



Kudos to Owl -Ware 
Editor: 

I have su hsc ri bed t o TH r R At N n OW s i nee 
1 9 84 and have nev M taken the time to write. 
I h a v e dec ri tied to drop y a u a note at lh i s t i i ne 
to g i ve C > w I -Ware a t ittl e pat o n the hac k . 

1 purchased a bare disk drive from Owl- 
Ware in December of 1990, 1 installed the 
drive as Drive 1 and used it from time to 
time, mostly as a backup. In November of 
VN I it started producing read/write errors, 
so I beg an to shop for a re place mem. Wh i le 
looking through the ads T I noticed Owl- 
Ware guarantees their driven for one year. 

Thinking this was loo good to be [rue. I 
called Owl -Ware and asked. The person I 
spoke with assured me it was so, and after 
getting my name and address, checked the 
records and informed me the drive was still 
under warranty, I was issued a return au- 
thorization number and sent the drive to 
Owl- Ware t he ne *t week , It was returned to 
me in a few weeks with no questions asked. 
The drive is now performing as it should, 
thanks to the folks at Owl -Ware. 

You know, since I didn't know the pur- 
chase date or have my receipt. Owl -Ware 
could have told mc to forget it. (Several 
companies I used to deal with might have.) 
The people at Owl-Ware mean what they 
say, and they provide good and honest 
sen' ice I 

Now, fellow CoCo -nuts, if you arc writ- 
ing software amateur radio, please contact 
mc. My number is (606) 787-7721; my 
packet mailbox is at N4YUU.KY, call sign 
KM4IY. 

Mike Brown 

Rome 6. Box 130 

Liberty, KY 42539 



Needs Help for the Disabled 
Editor: 

I'm trying to locate a program you re- 
viewed in the January 1986 issue of THE 
RAINBOW (Page 204}, The name of the 
program is Morser. and it was by a Mr. 
Dalhaus of Rehab Technology. The origi- 
nal [migrant was in ROM pack (hnpe, hope), 
but may be available on tape or disk. 1 want 
to help a severely handicapped lad commu- 
nicate, so is there anyone who can help us 
with this? For the last year I have tried act- 
successfully to write my own program, but 
lack of time and patience has held me back. 

T really enjoyed Eric Minis' "Puff Cal- 
culator' (the rainbow. February 1989, 
Page 50] and Dennis Weidc's "Hands-free 
Computing" (same issue. Page 58). Both 
show excellent uses for the CoCo. 

Keep up the good work down there at 
FaJsoft. I'm continually poring over your 



an ic les for in format ion . I ju sc don *t seem to 
have enough free time for OS-9 and all the 
other tempting things the Color Computer 
can do. 

Michael Little 

Box 125 

Port Hood C.B., NS B0E TWO 

Canada 



Welcome Aboard! 
Editor: 

Since newsstand sales of TMF RAINBOW 
have been discontinued, I decided to sub- 
scribe. After buying back issues and com- 
paring them with newer issues, my next 
purchase had to be the main source of 
information on available products for the 
CoCo. 

1 hope to submit a program soon, and 1 
have a thousand questions to the editor. Ha! 
But for now I'm a slow typist. (Even Max- 
10 can't help mc with that). 

Dale Kramer 

P.O.Box6024 

Fernattdina Beach. FL 32034 

We'd he glad so look at your creation. 
And send your questions, too. We'll do our 
best to give you the answers you need. 



RAINBOW Submissions and Orders 
Editor: 

I support THE RAINBOW and the Color 
Computer 100 percent. I plan to submit 
programs to Ehe magazine, but you require 
:s pr i n I ei I copy o Fl he I isl i ng a nd the ed itori aJ 
material. Ai this time I don't have a printer, 
nor do I ha ve access to one . Is t here an ot her 
way io send in the material or do T have to 
wait until I get a printer? 

I also have one complaint about the 



magazine. Some of the order forms are 
made to be cut-out. This ruins the mint 
e ond iti on of the magazi ne and also ru i ns the 
text on the flip-side of the page, is there 
some other way to order without cutting the 
pages? 

P etui Pieterek 

313 S. Division Street 

New Lisbon, WI 53950 

We understand not ail readers have a 
full-blown system. While hardcopy helps in 
our evaluation process and comes in handy 
should we decide to publish your program, 
it is not an absolute requirement. In a 
situation such as yours, send the programs 
and articles on tape or disk. However, you 
should include a hand-written cover letter 
describing your submission. 

Wi' do provide a toll-free order sen ice 
{for orders only} for readers who hove a 
VISA , MasterCard or AM EX charge card. 
(Cad 800-847-03091 Those who don't will 
have to clip. Or . . . an alternative is to 
photocopy the page and send the copy in 
with your order, 

THE RAINBOW welcomes letters to the 
editor. Mail should be addressed to: Letters 
to Rainbow, The Palsol'i Building. 9509 
U.S. Hwy 42, P.O. Box 385, Prospect, KY 
40059. Letters should include the writer's 
roll name and address. Letters may be ed- 
ited for clarity or to conserve space. 

Letters to the editor may also be sent to 
tis through our Delphi CoCo SIG. From the 
CoCo S1C> prompt, enter PlAE to get to the 
Rainbow Magazine Services area of the 
SIC. AuheRAtNBO\V>proinpi.enter LET 
to reach the LL r ITER,S> prompt, then se- 
lect Letters for Publication. Be sure to in- 
clude vour complete name and address. 



40 NEW GRAPHIC DISKS! 



Our three graphic sets (10 disks each set) 
were so popular, we've added 4 more! 





|E3i L_f 









Every order includes Mucpainl - an excellent graphics cailor. 
Craphic pictures are Coco Max compatible. 



Prices: $20 per 10 disk set 3 or more sets - $15 each 
Special: Alt 7 sets $90 



Set*! 

CUpart 

Animals 

More 



Set #2 

Celebrities 

Cartoons 

More 



Set if 3 

R-Raled 

Women 

Aitulis Only 



New Sets 4,5,6,7 
Each set has a variety oft 

Business ClipnrL Grin 
Graphics. Sports. Special 

A*t titj- Vtus much more. 1 



RAINBOW 



Mail ■ 



T&D Subscription Software 

2490 Miles Standish Drive 

Holland Ml 49424 

(616) 399-9648 

Fax: (616)396-2744 



Name_ 
Address. 
City_ 



Credit Card f . 
Expiratit! 



Stale Zip. 



_ Total $_ 



Please Circle Graphic Disk Sets 12345 67 
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Product Review 

Photon: Addictive 

Arcade Action 

at Its Best 

The cover of Photon's manual claims, 
"It's too addictive/ 1 and ] have to agree. It 1 s 
the most addicting game I've played on the 
CoCo since Tetris — and just as difficult to 
describe. I hope 1 won't be getting anyone 
into major trouble (me included) by saying 
Tilt: rainbow's staff has spent a lot of time 
careening through Photon's many levels. 
It's our job to test these programs thor- 
oughly, right? Right? 

Just what is Photon! Feast your mind on 
this: an original logical/puzzle game that 
requ ires you to gel from Point A to Point B. 
Sounds simple, doesn*l it? Well, it's not 
easy, but it is dressed up in a slick arcade 
package with all the bells and whistles — 
awesome 16-eotor graphics (at 32Q-by-200 
resolution), smooth animation, music 
(which changes every level), sound effects, 
d ig it i zed speech and more. And i t all fits o a 
one side of a copy-protected floppy disk. 
Both one- and two-player odes arc sup- 
ported by Photon, 

As you've probably already guessed, a 
CoCo 3 is required -both L28K and 5 1 2K 
models are supported, CoCos with 512K 
load the whole game into memory, never 
needing to access the disk again. On 12SK 
machines, the CoCo must access the disk 
between levels. 



As usual with computergames. there's a 
very scicncc-fietiony scenario wrapped 
around the arcade functions. This one in- 
volves a mysterious robot named Ludevide 
(a creative way to spell "'evil dude"), who is 
siphoning off all the energy from your 
planet. There's no way to stop him. but 
scientists have developed a Power Tank 
weapon to i nfi It rate L udev ide * s I ai r x and — - 
guess what — you've been volunteered. 

In one of the game's many amusing 
touches, Ludevide pops up hetween levels 
to offer up mocking laughter and words of 
discouragement. His floating head bobs 
around the screen saying things like, "Don't 
you ever learn?" With his huge visor eyes,, 
he looks like the Cyc lops character from the 
X-Men comic book. 




The game begins at Level 1 inside Ludev- 
ide L s st ro rig hoi d Most oft he sc recn i s taken 
up by the play area grid You're the squarish 
tank, and the marble-like objects in con- 
stan l mot i on are the dupes. The goal i s to get 
from Point A (where the game puts you at 
the beginning of each level) to Point B (the 



L 'exit" square % having minimal contact with 
the dupes, A rake-on-cement sound accom- 
panies encounters with dupes, and such 
brushes show up on the damage meter at the 
bottom of the screen, H the damage bar fills 
up, you lose a life. 

There are also blocks that lie between 
you and your goal, but these can be tele- 
ported (pushed or pulled) out of the way. 
Not only can you teleport blocks to clear a 
path, you can use them to affect the motion 
of dupes. 

The mindless dupes move in an intricate 
dance, and their movements arc determined 
by arrangements of blocks. An ordinary, 
square-shaped block sends dupes back at 
ISO degrees. Curved blocks (I call them 
**redirectors^) send dupes off at a90-degree 
angle. By careful placement of blocks and 
redircctors t you can trap dupes into tight 
repealing patterns, leaving you free to pur- 
sue die exit square. 

Each level is a new challenge, and it gets 
more difficult the higher you progress. Level 
4 brings a new surprise — plasma droids, 
blobs that actively pursue you. If a plasma 
droid latches onto you with its boogie- 
woogie" sound, you*re a goner. Plasma 
droids make a meal of the power tank in 
seconds, and all you can do is watch as the 
damage meter fills up. You can't easily 
outrun them, but you can use: your wits and 
tclcporting skills to save yourself. 

Like the dupes, plasma droids can't move 
through solid blocks. And ihe droids have 
another weakness — they're as vulnerable 
to the dupe s as you are. Y ou can trap a droi d 
using either blocks or dupes and, if you re 



clever, make dupes kill droids for points. 

It sounds like Lve been describing an 
arcade game — and Photon is a terrific 
arcade game in many w r ays — but it re- 
quires more than bang-bang reflexes to 
advance to higher levels. It takes brain- 
power to finish levels with four or more 
plasma droids, an intricate network of dupes, 
a hidden exit square, and little room to 
maneuver. 

It takes a multitasking brain to keep up 
with all the moving pieces. It takes a strate- 
gic brain to foresee the ramifications of 
moving just one redircetor block. Like chess, 
y ou m ust be able to e x t rapotatc your action s 
by thinking several moves ahead. And yes, 
it takes quick reflexes to get out of the way 
once you've accidentally teleported the 
wrong block and released a horde of dupes 
and droids. 

Finishing a level brings such a sense of 
accomplishment that the player wishes there 
were a way to save his or her place in a 
game. As it is, you must start over from 
scratch every time. While it's possible to 
begin at any level from 1 to 15, that's of 
little comfort once you reach Level 30, 
Besides the lack of a game-save feature. 1 
can think of only good things to say about 
Photon. 

Photon has the mark of a classic game. 
Its goal i s casi 3 y understood , its co ntrol s are 
simple, but winning is devilishly complex. 
My recommendation: Addict yourself! 
(Sitndog Systems, P.O. Box 766 , Manassas , 
VA 221 J 1, (70S} 330-8989; $34,95 plus 

— Lauren Wi Hough by 



Feature Program 



Gray-level Printing for HSCREEN2 



When I obtained a modem for my 
Color Computer, I immediately 
started downloading all the pictures 
I could from online services and BBSs. In 
looking for ways to print these images, I 
wrote a program that supports four gray 
levels for printing KSCREENs. But most of 
the pictures in my library sport 16 colors, 
and 1 wanted to get a more accurate 
hardtopy. Since 1 don't have a fancy color 
printer, I decided to write a program to print 
these full -col or pictures using as many gray 
levels as possible with a standard dot-ma- 
trix printer. The result is AutoGray. 

AutoGray is a screen dump program lor 
the CoCo 3 and a DM P- 1 (15 {or co mpat i ble ) 
printer. A color monitor is not necessary 
(though yon probably have one if you have 
a collection of 16-color pictures), Auto- 
Gray i s desi g ned t o print H S C R E EM £ i mages 
in 11 different levels of gray. Re forc- 
wamed 4 however: AutoGray is fairly slow 
due to the speed limitations of BASIC. Even 
so, I find the results are well worth the wait. 

After you enter AutoGray, save it to tape 
or disk. Before running the program, you 
must load the image you want to print. 
Because of the wide variety of file formats, 
and because you may want to print draw- 
ings that are not saved on disk, AutoGray is 
not designed to load images. 

You can use AutoGruy to prim HSCREEH2 
images draw r n by BASIC (or other languages) 
or images loaded using one of the many file 
viewers written tor the CoCo. If the draw- 
ing program you use is in BASIC, press 
BREAK after the image is complete. Simi- 
larly, when you exit most viewers, the last 
picture viewed is usually left intact. En 



some cases, pressing Reset can be used to 
leave Ihe picture in memory. After you are 
returned to BASIC, load and run AutoGray. 

When the program is ru nning , press any 
key and you will see whatever is stored in 
HSCREEN2. (If the screen is blank, the pic- 
ture program erased the screen as you ex- 
ited, Try another approach) The colors 
used may be inaccurate due to the resetting 
of all the paieiies. However. AutoGroy is 
designed to automatically assign gray lev- 
el s for you , so sh i s shou Idn ' l be of too much, 
concern. 

AutoGray proceeds to scan the picture to 
gel a rough idea of what colors arc pre sen I, 
After scanning, the program assigns the 1 1 
gray levels to Ihe 16 palettes. The color 
(palette) that appears the least in the image 
is assigned the darkest gray level. This is a 
feat ure th at he Ips saves ink; i I also frees you 
front having to decide what level should go 
with what color. 

After assigning gray levels. AutoGray 
displays a list of the 16 palettes, what per- 
centage of the image uses each palette, and 
what gray level is assigned to the palette. 
Most of the time you can simply go to the 
print option. However, you can also manu- 
ally assign gray levels, [f you want to 
manually assign the gray levels, you are 
given the option to do so (but 1 find this is 
practically impossible unless 1 wrote the 
prog ram that generated the pict ure ) . Sho uld 
you change your mind after manually en- 
tering the gray levels, AutoGray allows you 
to reset them to the originally assigned 
levels. You are also given the option to 
view the image in memory. 

As 1 stated before, priming is slow be- 



cause of the speed limitations of the printer 
and BASIC The program runs in the high- 
speed mode (Line 40), which helps some. 
The CoCeTs printing rale is set in Line 50, 
A s wri [ ten , the pri nter mu st be set for 2400 
baud (1200 baud times two, for the high 
speed). Further speed increases can be 
gained by using a serial/parallel converter 
and driving the printer at 9600 (poke for 
4MU)mh l5,2<M) baud (poke for 9GUU). 

Lines 170 through 220 count how often 
a particular palette is used on the screen, 
and Palette is set to an absurdly high 
number (Line 240) to assure that Palette is 
always white. I put this in because I always 
use Palette for my background. Feel free 
to delete it if you want. Lines 250 through 



320 order t he 1 6 pa letre s from mo st- used to 
least-used and assign the levels. 

Each of the 11 levels is constructed 
using a 4-by-5 printed matrix to represent a 
l-by-2 matrix onscreen. All the possible 
combinations of grays are stored in arrays, 
which arc then printed based on what the 
computer finds at each screen location (lines 
540 through 650). After printing, the pro- 
gram returns you to basic. 

AutoUray is easy to use and is a great 
way to print fractals and just about any 
other HSGREEN? image. If you have any 
questions, comments or suggestions about 
this program, feci free to contact to mc. 



^ 



Stuart T. Wyss-Gailifent is a college 
senior majoring in elementary education. 
He has worked with thtr Color Computer for 
eight years. Stuart's non-computer activi- 
ties include photography and musk, and he 
leads a church youth group. He can he 
contacted at 2123 L&ngview Road, War- 
rington, PA 1 8976, Please include an SASE 
when requesting a reply, 

— — 
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The Luting: AUTOGRAY 

1 'AU10GRAY SCALER 93 

2 'BY STUART HY5S-GALLI FENT 0. 

3 'COPYRIGHT CO 1992 100 

4 "BY FALSOFT. INC, ETT 

5 'RAINBOW MAGAZINE :IF 
30 ' USES 11 LEVELS Of GRAY IN A .HI 

4X5 ARRAK TO REPRESENT A IK? PI 110 

XEL LOCATION 1?0 
40 POKE 65497, 8:'SPFEDUI> POKE 
50 POKE 150.41: '1200 BAUD FOR PR 

INTER (HI SPEEO-1200X2-2400 BAUD the 

ON PRINTER) It 2 

60 POKE &HE6C6,33:'DEACTIVATE AU tee 

TOMAIIC HSCREEM CLEAR cd 

70 DIN P(16>.D<16}.Q(16),P1!12.4 eM , 

).P2(1?.4),PC(16),QB(16) 130 

80 ON BRK GOTO 100 our 



WIDTH 80:RGB:ATTR 0.0:PALETTE 
0:PALETTE 8.63:CLS:GOT0 110 

POKE 65496.0: PALETTE 0.0:PAL 
E 8,63:ATTK 0,0:CLS:HSCREEN 2 

X-316 THEN 830 ELSE HSETCX.Y 
):G0T0 B30 

LOCATE 36. 6; PRINT-ALU OGRAY " 

PR1NT:PRINT"AUT0SRAY scaler 
a screen dump program for use 
Lh ihe COCO 3. It will scan 

screen in memory (any HSCREE 
), then determine hen the six 
n colors should be assign 
to the eleven possible gray 1 
Is . taking Into accoun 

PRINT" how to save ink on y 

printer." :PRINT:PRlNT"After 
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someone or something Is alowty siphoning II away As your world s 
champion you m Fault id 

challenge Itiia nemesis and his minions ¥ 
rr- felcpoit scfwmass iJsethistomanipuij : {endless 

'• raplurt the Tree- 1 luting DUPES 
tense Umls ol Phaioii Energy) to destroy Ilia munaung Plasma 
Droids £e cautious though moss DUPES an tus deadly. loe 1 
Photon, a hjnlastn m« tot your Ctxra. contains spec 

lacular 320x200 resolution. 16 color graphics ulna-smooth En f,i 
- and loads it reat-timB music »nd sound ettc-:- 
1 mind racing over endless possiDilihe* roquvrng quick 
dedsioos end reactions Quit* simply, Ptioton rs incretfiBly addlclne. 
it will deliver hours ol eicttemenl Will you become youi world s 
greatest herd, or |usl another 
emiffy slam? Req 126K Coco 3 
and disk drive 



■'.* clipping and high-res ; :.^ check- 

ing. The a-octave-i-julce music syntlwsrrar has independent 
envelope, wavetonn, and volume controls, a T 4 KHf sampling rate, 
and much mors include lexl/graphles mn 

• 1.11 sites, last window copying and scrolling oiclufs 

'Italian Horn nolo BASIC and assembly 
language, multiple screen animation, and support rot 128 
douute speed, and the high-res joystick interface Itvt package also 

'.upper! programs that are «wlh the 
GralExpress alone! These include an introductory demo, a picture 
editor, a wavelorm editor, and an an program mat supports 2ih col- 
ors' GralEnpress also comes with a Ml page manual mat luliy ex- 

• ol its incrediua iealum ,1 you do any graphics program- 
ming or simply want 10 see what 
your Utile Coco Is capable ol. 
G'afEnprass is a must' Ret) I28K 
CoCa 3 end disk drive 



lords are 
readying thou totces II falls to you to lead your people against these 

tnd only your best strategic plans can rave the day. Fight 
the good tiom tn any era of locait- 

llagarmi-- - 1 -.-ns.u' climb into the cockpit ola 100 too! 

nigh armored wattier Explore Irte deepest dungeons, delend ydur 
galaxy, or create your own scenarios with Ihls Incredible war game 
construction sot '"simulator your imagination is your onry limit You 
will deploy you' inters wr- ■■'< hoslila terrain while you 

scroll a graphic bird's-eye window over an Immense world War 
Monger has terrific 320x200 resolution, 16 color graphics and in- 
cludes a tile editor to create or edit your own. Play against the com- 
putet, battle with another player, or simply watch the computer plot 

nil The enemy is everywhere Art you ready to take on Ihe 
challenge as I hie War Monger'' Req 
< 2BK CoCe 3 and disk drive. ■ • iX*T# ■ 
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1 immensity popular 128K CdCo 3 arcade.-' advert- 
. Over 500 screens 01 ■ Pen and 

iz/le solving. Great graphics and sound ertgcis. 
SM K. Hint book only W 95 



avAi»-^ BtE 



A 512K Iwo player futuristic combat arcaos game, 
"-ardntate scrolling and 
smooth animation Sack-ground music score and 
sound effects' 512K Cocoa only 3* 95 
Shipping sount 



this was THE name ol '91' Ultra-last space action 
with Hardware scrolling on a 12SK Cot 
sound aft (0 MegaByles 01 amazing 

MM 
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Uflhtning 

TtmHe 320x225 graphics tuck-ground music 
scwa and sound crttal9< and Dul-ot-s-igh! game 
piav *tt.9S. 
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Warrior King 
CoCo3 


129.95 






In Quest of the Star Lord 

OoCo3 

Him Sheet 


$34.95 
t 3.9S 






H.llotlhe King I.J 01 3 
CoCo1-3 


$29.95 ea. 






Hall oltho Kino Trilooy 

White Fire si Etemlly 
CoCot-3 


174.95 
$1996 






Dragon Blode 

cocot -a 

Champion 
CoCot-3 
Paladin's Logacy 
C0C0 1 -3 


113.91 

uses 




oackgto 
y 534 










MaSte'tarrj Chat* Money Order, .sin; COQ 
1 USA cmlv. 0led5?f accaptefl Air lerrign aiders 
niusl tie sent In US cufeni.-y Money Orders, inchiitt 
%?. SO lor shipping >n iiSA tnd :m\itik Sit Ofi 
Fpraaign. 5j ■ taraCK ftft rpsulBrnrt 

- . ■ 
we're iKwirg rcr -vnw sflliwa'iii 




tirjOoa 



&SEEEEES&E3& 



P.O. Box 766 • Manassas, VA 221 1 1 
703/330-8989 
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pressing any key. the program wl 


320 NEXT 


45B FOR Z-B TO IS 


630 NEXT Y 


11 take about forty seconds to a 


330 FOR Z-B TO 15:QB!Z)-Q(Z):NE* 


4 60 GOTO 4BB 


64B PRINT#-2.CHRt(27)CHRI(90)CHR 


nalyze these reen In Denary." 


T Z 


470 PRINT"*** DATA ENTERED INCOR 


t(5)CHRt(13): 


140 GOSUB 68B 


340 HSCREEN B:CLS 


RECTLY. Please try again. " 


6S0 NEXT X 


150 PRItlT:f>RlNT"PRE5S ANY KEY TO 


350 It-INKEY! 


480 PRINT"For color":", enter se 


660 POKE 65496.0 


BEGIN.. ,":EXEC 44J39 


36B PRIKT"COLOR * LE 


lected Gray Level (0-10) "::1NPU 


670 GOTO 100 


160 HSCREEN 2 


vr '■ 


T GL 


680 ■ ASSEMBLE STRINGS 


170 K-fl 


370 FOR Z-0 TO 15:PR1NTUSING- # 


490 IF Z-0 ANO GL— 1 THEN 340 


690 FOR X-0 TO 10: FOR Z-l TO 4 


180 FOR X-4 TO 314 STEP 4; FOR Y- 


# #.## t* ":Z.PC(Z). 


5B0 IF GL<0 OR GL>I0 THEN 470 


700 READ PKX.Z) 


e TO 191 STEP 4 


Q(J) 


510 IF INTCSUOGL THEN 470 ELSE 


710 NEXT Z.X 


190 H-HPOINT(X,Y) 


380 NEXT Z 


0(Z)-GL:HEXT Z:GOTO 340 


720 DATA 0.0,0.0.0,2.0.0.2.0,1,0 


200 K-K+l 


390 PRINT"Gray level B represent 


520 PRINT:PRINT"Press any key wh 


.4.1.0.2.2.4.1.2.5.2,1.2,3.5,2,1 


JL0 P(H!-P<H)+1 


s white on paper, level 10 repre 


en printer head Is at the VERY t 


.6.5,2,3 


228 NEKT Y.X 


sents sol id black" 


op of the page...":EXEC 44539 


730 DATA 6.3.3,3.7,5.3.3,7,7.3.3 


230 FOR 2-fl TO 15:PC(Z)-1NT(1000 


40B PRINT:PRINT"Press <ENTER> to 


530 PRlNT*-2,CHRt(30>CHRK27)CHR 


740 FOR X-B TO IB: FOR Z-l TO 4 


fl*P(Z)/IO/100:KEn Z 


print. <E> to manually enter th 


H21)CHRt(27)CHR)(20)CHRSf 18JCHR 


750 READ P2(X.Z) 


240 Ptaj-SBBBB: 1 SET BLACK {COLO 


e gray levels for each color. 


l(27)CHR*(90)CHRi[4)CHRI(l3): 


760 NEXT Z.X 


R 0) TO NO DOTS (WHITE OH PRINTE 


<R> to automatically reassign th 


540 HSCREEN 2 


770 DATA 0,0.fl.0,0.0,8.fl.l6.B.0, 


R) 


e levels, or <v> to view the scr 


550 FOR X-4 TO 314 STEP 2 


8.B.0.16.8,8,16.0,?0,8.16.8.20.2 


250 FOR H-0 TO 15:D(H)-H:NEXT H 


een." 


560 FOR Y-191 TO STEP -1 


4.16,8.20 


260 FOR T-0 TO 14 


4 IB H-INK£Vt : IF IS-"" THEN 410 


570 Hl-HP0INT(X.*):H2-HPOINT(X+l 


780 DATA 8,24,16.28.25.8,28.20,2 


270 IF P(T)<P[T+1) THEN D-P(T+1) 


428 IF II-CHRK13) THEN 520 


,Y> 


4.8.28.28,24.24.28.28 


:P(T+1)-P(T]:P(T)-D:D-D(T+1);D(T 


4Z5 IF It-"V" THEN HSCREEN 2: EXE 


580 IF Hl-B THEN H5ETU.Y.B) ELS 


790 RETURN 


+I)-D(T):D{T)-D:CF-1 


C 44539:0070 340 


E HSETU.Y.B) 


800 ' GRAPHICS POSITIONS 


280 NEKT T:1F CF-1 THEN CF-0:GQT 


43B IF lt-"R" THEN FOR 1-0 TO 15 


590 FOR Z-l TO 4 


810 DATA 0.0.1.1.2.2.3.3.4.4.5.6 


D Z60 


:<K2)-QB(Z>:NEXT Z:GO10 340 


600 PRINT#-Z.CHRS(128+P1(0(H1>.Z 


.7,8.9.10 


290 FOR G-fl TO 15 


440 PRINl:PRINT"F.nter -1 for col 


HP?(Q(H2),Z»>; 


820 ' END 


300 READ GP 


or ir you wish to abort this f 


610 NEXT Z 


830 HSCREEN 0:RGB:W1DTH 32:END 


310 Q(D(G))-GP 


unction." 


620 HSET(X,Y,H1> 


/R\ 



Feature Program 



Vname 

Lets You Make the Call 



When I huyancwboKofdisks. Hike to 
format them all at once so they're 
ready when I need them. The problem is* 
OS-9 requires you to name each disk when 
you formur it; and since I don't know in 
advance what HI be using each disk for T I 
don' i know vhat to call them. So I format 
the disks with an arbitrary name, and when 
I use the disk later. J use Vname to change 
the name to something more appropriate. 

Here's another example of where Vname 
comes in handy: Suppose you check the 
amount of free space on a disk and discover 
the disk name bears no relation to the disk 
contents. You can ignore the name (but it 
won 't go away by itself)* format a new disk 
and copy all the Hies to it. or simply use 
Vname to change the disk's volume name. 

Using Vtiame. is easy: Just enter vname 
followed byadevice name. Ftiresamplc. to 
change the volume name on a disk in Drive 
0, you would enter vname /dO. After you 
enter the command. Vname displays the 
existing volume name and asks for die 
new name. Enter the new name (no 
quotes necessary r ) and press 
ENTER. Vname writes the 
new name and the cur- 
rent date to the 
disk's identifi- 



cation sector. To leave the name unchanged, 
press ENTER b> iiseir. 

If you enter vname without specifying a 
device. Ihe program assumes you want to 
change the name of the disk on which your 
current execution directory resides. Vname 
works with any floppy or hard disk. 

For those without an OS -9 assembler. 1 
have included a QASIC09 procedure thai 
generates the machine -language version of 
Vname, When you run make vname . bQ9, the 
executable program is stored in the CMOS 
directory on the default drive, [f you are 
using OS -9 Level 1, make sure to change all 
references to /dd to an appropriate drive 
number (/d0 t /dl. ere). 

In most cases, an accurate volume name 
isn't too important. However, Vname does 
help you to keep your disks organ ized. and 
it solves a petty annoyance that ' s not easy to 
correct any other way. 



Stephen Goldberg is a dentisf 
and i he author of the Litilipak 
series of OS-9 utilities. He 
can he contacted at 695 
Plainview Road, Beih- 
page, NY 11714, 
Pleas? include an 
SASE when re- 
questing* a reply. 
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Listing 1 


: Vname 


. a 5 !T 




******** 


***+**+************« 


C*#*W*#***#lt*ft****#ft*>ft 


* VNAME 

* 


- COPYRIGHT (c) 1981 


by S. B. GOLDBERG 


* Changes volume name (disk 
* 


name J 


* Use: vname [/drlve^name] 






ffpl 








use 


/dd/defs/os9G 


efs 




endc 








to: 


len.name.prgrm+DbJct.reent+l .entry, dsiz 


-nt-- ..- 


rmb 


5 


date and time buffer 


vol name 


rub 


■it 


volume name buffer 


path 


rib 


1 


I/O path number 




rub 


zee 


stack 




nin 


zaa 


parameter 


dsiz 


equ 






name 


fes 


/Vname/ 






feu 


Z 


edition number 




fee 


/(c)19B45, Goldberg/ 


syntax 


fee 


"Use; vname tVdrive]" 




fib 


tB70d 




rename 


fee 


/Rename "/ 




renaml en 


equ 


*- rename 




******** 


+******+#************* 


* ERROR 


MESSAGE 




*********+**** 


****** ********** 


badsyntx 


clrh 




clear error flag 


error 


leax 


<synta)t.pcr 


syntax message 




Idy 


nm 


maximum length 




Ida 


■!Z 


standard error path 




OS 9 


Kmrltln 


message to screen 




IS'.l 


out 


quit 


********++**+.****#********* * 


** 


* GET AND DISPLAY CURRENT NAME 




******** 


* * ** * ** * * * * ** * * * * ** i 

pshs x,u 


save pointer & data address 




entry 




Ida 


.x+ 


first parameter character 




decb 




parameter? 




beq 


setend 


nc, change current disk 




empa 


#'/ 


device name? 




bne 


badsynti 


no. prompt and quit 


devloop 


Ida 


,x+ 


device name character 




ciupa 


»■/ 


pathUst? 




beq 


badsyntx 


yes, prompt and quit 




enpa 


#(2fl 


end of device name? 




blii 


devloop 


no. look some more 


set end 


Ida 


#'&+12B 


"§" for entire device 




sta 


■1 ,» 


to end of device name 




BtllS 


n 


retrieve parameter pointer 




Ida 


#updat. 


update mode 




85 S 


; Jocen 


open path to device 




bes 


error 


prompt and quit with error 




sta 


:■!-. ■ ■ 


save path number 




Id* 


m 


position of volume 




Idll 


*31 


name on disk 




os9 


Hseek 


go to volume name 




br ', 


out 


exU with error 




Idu 


.5 


retrieve data address 



THE RAINBOW 



May 1992 



leax 


vol name, u 


volume name buffer 




ldy #37 maximum data length 




1*y 


#32 


maximum length 




clrb clear error flag 




059 


1 iread 


read current volume name 




os9 i (write new date and name to disk 




bcs 


out 


exit with error 


out 


os9 f(exit quit 




endloap Ida 


,x+ 


last character of name? 


* 






bpi 


endloop 


no, look again 


prompt fee /to: / 




anda 


#S7f 


yes, clear ms bit 


prmptlen equ *-prompt 




sta 


-1.x 


return to name 


* 






Idd 


#*220d 


quotes and carriage return 




emod 




std 


,x 


quotes and c/r to buffer 


1 en 


e<ju * 




Ida 


$\ 


standard output path 




-.' r d 




leax 


<rename,pcr 


■Rename' message 








Idy 


tfrenamlen 


message length 








0S9 


Uwrltlri 


message to screen 








teax 


vol name ,u 


volume name buffer 








ldy 


#34 


maximum length 


Listing 2: Ma keyname. b09 




os9 


1«wr1 tin 


current name to screen 








************** 


************** 


** 


PROCEDURE Nakevname 




* GET DATE AND 


NEW DISK NAME 




(* 6e 


nerates the binary module vname *) 




****************************** 


(* Level I • change all /dd to lit M 




tfr 


u,x 


date and time buffer 


DIM path, bvt: BYTE 




os 9 


fnime 


get current date and time 


DIM count: [MEGER 




lean 


<prompt,per 


prompt for new name 


PRINT "Creating vname . . ."; 




ldy 


#prmptlen 


length of prompt 


CREATE #path."/dd/cmds/vname":MRITE 




os 9 


Kwrltln 


prompt to screen 


FOR count-1 TO ?Si 




clra 




standard Input path 


READ 


byt 




leax 


vol name. u 


volume name buffer 


PUT #path,byt 




ldy 


#33 


maximum name length 


NEXT 


count 




os 9 


1 treadln 


get new name from keyboard 


CLOSE #path 




bcs 


out 


exit with error 


PR1N1 






tfr 


y.d 


entry length 


SHELL "attr /dd/emds/vname e pe" 




decb 




entry made? 


END 






beq 


out 


no, abort vname 


DATA 


135. 2Bb. »,2!jS,B. 13, 17, 129, £15, B, 81, 1.184,86, 110 




leax 


b,x 


end of new name 


DATA 


97.109.229,2.40,99.41.49.57.56.52,83.48.71.111 




Ida 


,'X 


get last character 


>.TA 


108. 100,98, 101.114,103.85,115. 101.58,32, 119.110 




ora 


#taa 


set ms bit 


DATA 


97, 109. 101. 32. 91, 47. 100, 114. 105, 118. 101 ,93, 7.13 




sta 


, « 


return character to buffer 


DATA 


62.101.110.97.109.101,32,34,95,48.140.223.16.142 




nul 1 loop clr 


,X+ 


null 


:;ai,'. 


B. 100. 134, 2. 16. 63. 148,22,0.164, 52. 80, 166, 128. 90 




Incb 




out 


DATA 


39.14.129.47.38.229.166,128.129.47.39.223.129 




cmpb 


#32 


remainder 


DATA 


32,34.246,134.192,167,31,53,16.134.3.16.63.132 




bio 


null loop 


of buffer 


DATA 


37, 207. 151. 39. 142, 0.B, 286,0,31,16, 63, 136, 37, 117 




* * * * * * ■* * * ** **************** ** * 


DATA 


238.228.48.69.16.142.0.32.16.63,137.37.104,166 




* REPLACEMENT 


NAME TO DISK 




DATA 


128.42.252.132,127.167.31.204.34.13.237,132.134 




**************************** 


Tit 


DATA 


1.48.140.154.16.142.0.8.16,63.140.48,69,16.142 




Ida 


path 


I/O path 


DATA 


0,34,16.63.140.31,49.16.63.21.48.140.65,16.142 




Idx 


#0 


position of 


DATA 


0.4. 16.63,140. /9. 48. 69, 16, 142. 0,33, 16, 63, 139. 37 




ldu 


#26 


date on disk 


DATA 


43,31.32,90,39,38.48.133,166.130.138.128.167.128 




os 9 


i Sseek 


go to it 


DATA 


1 11, 128. 92, 193, 32, 37. 249, 150, 39, 142, 0, 0.206,0 




bcs 


out 


exit with error 


DATA 


26.16.63.136.37.10.53,16.16.142,0.37.95,16.63 




p ,1 1 B 


K 


data address 


DATA 


138.16.63,6,116,111.53.32,248.232.195 


rf^ 



WW BotBK <& Btoipffjte 

■ P.O. Box 733 Maple Valley, WA 98038 

^1 \J U.S. ORDER DESK: (800)237-2409 

^9^ INTL&TECHNICAL: (206) 432-1814 

Burhe G Burhe congratutatBS 

The Rainbow on their new format! 

0S9 Software (* >= 25611; ** >= 512H): 

WORLD CLASS CHESS*- Use Cyrus Chess w/ Level 2 
FILE SYSTEM REPACK 1 1 --Faster disk defragmenter 
FILE RECOVERY SYSTEM - Helps rebuild crashed disks 
R. S. B * - Disk BASIC for Level 2 (BASIC ROM required) 
EZGEN 1 09 - Handy & powerful 0S9 bootfile editor 
C Y BE RVOICE (S/W only)* - Use Super Voice w' Level 2 
PERTA5CIP - Multi-user scrambled letter word game. 
WILD & MV - Wildcard & move directory entry utilities 
ZCLOCK - Continuous time / date display on Level 2 screen 



BHBIC Software (* >= 



>= 512H): 



$29.95 


$29 95 


$24.95 


$39.95 


$19 95 


$24.95 


$19.95 


$19.95 


$9 95 


$9 95 


$29 95 



256K; 

DAGGORPATCH - Moves your Dungeons o1 Daggorath to disk 
H V PER-I/O - Use B&8 hard disk with many BAS IC programs 

Affordable Color Computer Hardmare: 

COCO XT -- Use PC hard crive w/ CoCo ! 0S9 S/W incl $69.95 

COCOXT-RTC- CoCo XT plus H/W real-time clock. $99 95 

XT- R O M -- B oots O S 9 from B& B hard disk automatically $19.95 

.- WATCH FOROSk VERSIONS OF YOUR FAVORITE 

BURKE & BURKE OS9 SOFTWARE / 



WA RESIDENTS ADD 8.2% SALES TAX. 
MasterCard & VISA accepted. US COD's add $3.75. Min. U.S. 
shipping $4.00. Min. to Canada $5.00. Please allow 2 weeks for 

delivery. Overnight or 2nd- day available for in stock items. 

Software upgrades $5.00 each w/receipt, including U.S. shipping. 

Call or write for our free catalog! 



Books to breathe 

lite into your 
Color Computer. 

Cain complete control over your CoCo with these 
Pokes, Peeks J n Execs Books. These books wH! give 
yuu the [xjvkji ;:l Machine Language wi Shout saving 
the security of BASIC. Each book is a collection of 
"inside" inlormation with explanations and 
examples. Everyone from the novice lo the 
professional wi IF find these books a wealth of 
information. 

#PK5Q0 • 5DD Pokes Peeks 'n 
Execs $16.95 

500 commands such as BASIC Program Autostart. 
Rompak Transfer lo tape. Commands/Keys Disables. 
and much much more? Far CoCo 1,2,4 3 

flPKSUP* Supplement to 500 
Pokes Peeks 'n Execs $9.95 

200 additional commands such as Rompak transfer 
to disk, double -sided drive support, AQfSQ track 
drive support & much, more! For CoCo t h 2,3. 

#PK30Q • 300 Pokes Peeks 'n 
Execs for CoCd 3 $19.95 

All new commands lor Ihe CoCo 3! !! 

item#CGDP $7.00 

item#PK500 £16.95 

item#PK3C0 $19.95 . 

item#PKSUP $9,95 

Shipping S3. 00 

Tax for NY & NJ residents 

OPTIONAL ORDER FORM TOTAL 

Nam e 

Add ress 

City 

State. 
Cart*. 



ZIP. 



_Exp.. 



Checks, MO's VISA/MC accepted, no COD 



The Print Shop 
For Free 

...Well practically. Send us S10 lo cover 
the costs of shipping, order processing, 
manual printing, and disk duplication, 
and we'll send you our best selling CoCo 
Graphics Designer Plus. The CGDP is 
the closest thing on the CoCo to 
Broderbund's Prim Shop for IBM and 
Apple Computers. This tried and true 
formula for graphics productivity comes 
with Fonts, Graphics and Border 
collections! The CGDP prints banners, 
signs, and greeting cards, includes a 
clear 64 page users manual, and requires 
a 64 K CoCo II or 111, mouse or joystick, 
disk drive, and supports most popular 
printers. The CGDP is one of the most 
popular and useful CoCo programs ever 
written. 

This offer is limited to one copy per 
family to fir si time Zebra customers 
only. It's our rather extreme way of 
introducing the Zebra product line to 
those CoCo users who've read all the 
great reviews of our products over the 
years and still haven't tried them. S10 
includes everything (except NY 
residents must add sales tax). Offer 
good for mail orders only and expires 
June 30, 1992. 

The Print Shop is a trademark of 
Brodcibitml Software Inc. 

Zebra Systems, Inc. 

131 Jora lemon Street #52 

Brooklyn, NY 11201 

(710)625-6220 



One-stop CoCo Shopping? One Choice. 

For the best selection of virtually all your CoCo shopping needs, try the 

CoCo PROfessionals. We don't do Windows (or DOS), or anything 

else... we just sell CoCo, 059, and OSk products. Professionally. 

We'll be here when you need us. 



HARDWARE 

512k upgrade w. Lightning software $69 

Slotpak-3 w/12v adapter $104 

Magnavox 1 CM 135 w/cable $299 

20-meg 0S9 hard drive system $385 

2400-baud modem w/cable $99 

CoCoPRO! RS-232 pak $45 

CoCoPRO! RS-232 kit (for dcm) $27 

Delta Pro Audio digitizer $129 

Ken-Ton Dual Serial port $89 

Ken-Ton SCSI HD Interface $99 

SmartWatch RTC $29 

Adaptec 4000a HD controller $79 

Burke & Burke CoCo/XT $69 

Burke & Burke XT/RTC $99 

Hard drive case w/60w supply $89 

IBM Keyboard interface $85 

Keyboard Extension cable (CoCo) $19 

4-pin to DB25 modem cable $15 

DB-25/DB-25 modem cable $15 

RGB monitor extension cable $15 

Multipak upgrade (3024 or 3124) $15 

Wico Deluxe Joystick (one-button) $12 

CoCo-2 composite monitor adapter $29 



Put away that pile of floppy 
disks and speed up your work! 

Put virtually every file you own at your fingertips with the 
new CoCoPRO!/Ken-TonS5-meg SCSI harddrivel Featur- 
ing a fast 28ms drive, this unique system gives you up to 
2SS 35 -track drives of RSDOS storage (compatible with 
virtually ail ML & BASIC software!), along with MEGS of 
OS-9 storage! With its Autoexec feature, you can easily 
auto -boot any file., .even auto -boot OS-9 upon startup! 
Comes completely formatted and ready-to- run... and, since 
it is in imbedded SCSI drive, you can even take the drive 
with you should you move to a TC-70 or MM/1 ! Choose 
10,50, 100, o r 25 5 RS DOS d rive set u p whe n orderi ng , and 
we'll format the rest for OS-9. Req. MPI, Slotpak, or Y- 
cable, and a floppy controller with 28-pin ROM socket 
(such as Disto or FD-5Q2). Those with 24 -pin ROM sockets 
(FD-500, 501, etc.) add J 10. 



only $549 



First Prize $39 

Label Designer $29 

CGDP $29 



SUB-ETHA 

MiniBanners $19 

Multi-BASIC $29 

Checkbook* (RSDOS) $24 



SUNDOG 



Photon 


$34 


Warmonger 


$29 


GrafXpress 2.0 


$34 


Crystal City 


$34 


Zenix 


$29 


Quest for The Ida 


$34 



DANOSOFT 

Big BASIC (512k) $39 
One-Meg Big BASIC $49 
Utilities Pak $18 

Big RAM Disk $15 

Memory Master $24 

CoCo Archiver $18 



van der Poel-0S9 

VED $25 

VPrint $30 

0S9 Maillist $20 

0S9 Ultra Label $20 

Stock Manager $25 

BASIC09 Subroutines $25 

Character Set Editor $20 

Magazine Index $20 

OS-9 Cribbage $25 



C0C0PR0!-0S9 

Data Windows $59 

Data Merger $19 

Tools II $35 

Presto Partner $29 

Level II Tools $25 

Disk Manager Tree $29 

Zapper $20 

Multi-Menu $20 

0S9 Lv II BBS $30 



COI0RSYSTEMS 

059 Game Pak $34 

0S9 Solitaire Pak $34 
WPShel (req. Mvue) $22 
M VBanner (req. Mvue) $20 



KAtASOFT 

Ultimuse (512k 059) $55 

KBCom (OSS term) $45 

Shellmate (req. Mvue) $25 

Newspaper09 $48 



BURKE & BURKE 

EZGen $19 

File Sys. Repack $29 

File Recovery Sys. $24 

RSB $39 

ZCIock $10 

Pert ASCI I $19 

Wild & MV $19 



COCOPRO-DECB 

Simply Better 2.0 $35 

V-Term 3.04 $35 

DMA 1.1 $29 

Art Deli (440 pix) $79 

Art Deli tl (220 pix) $39 

RGB-DOS $30 

RGB-059 Utils $25 




Include &4 S&H on all U.S. orders. Canadian and foreign orders 

have a $5 ruin, ship charge, or actual freight plus $2 handling. 

U.S. COD $4 additional. Ml residents add 4% sales tax. 

No surcharge on V1SA/MC. Call for shipping on HD* & monitors. 




Join us... 

for the 1st Annual "last CoCofest"! 



o 



COCOFEST 

MAY 30-3 1 , 1 992 



Okay... it comes as no big secret that there are fewer folks in the 
CoCo Community than there used to be. There are fewer active 
vendors. There is less magazine coverage. But, in spite of the fact that 
the "big guys" wrote us off to history years ago, we're still here. And 
we will be for as long as we choose to be, for the CoCo Community is 
a rare and special breed indeed! In celebration of the unique sense of 
kinship that CoCo/OS9/OSk users share, we invite you to join us for 
what we'll affectionally call "the 1st Annual Last CoCoFest". If enough 
of us continue to enjoy the fun and fellowship that sets us apart from 
many other computer users, there will be a 2nd (and 3rd, and 4th...) 
annual "last CoCoFest". Only time will tell. But, just in case, we're 
putting every possible effort into making sure that this show is more 
than just a show. ..that it is indeed a celebration of the Community. 

We won't ask you to come just out of a sense of loyalty to the 
Community (although, if that's what will motivate you to join us, 
consider yourself asked!). We'd prefer for you to come prepared to join 
in the fun, as we plan a non-stop CoCo party! 



Join us, and: 



*y^ Meet the "faces behind the names", such as Marty Goodman, 
Kevin Darling, frank Hogg, Clen Dahlgren, and more. 

^s- Get achance to w/ndozens of door prizes, valued at over $1000. 

^_ Share and learn at informative seminars on CoCo/OS9/OSk 
subjects, hosted by the best names in the biz. 

w_ Take in exhibits of all your favorite soft- and hardware, with 
"hands-on" demos and great show specials from top vendors. 

^_ Enjoy the hospitality of the Ctenside CoCo Club, with free 
^^ coffee during show hours. 

>^ Meet fellow computer enthusiasts that you've corresponded 
with over time, but never met face-to-face. 

And, to get things off to a roaring start, join us for the special 
5^ pre-fest "Party with Marty" on Friday nitefrom 7 to 11 PM 
(separate admission required). 

There's something to be said for saving the best for last... and 
that's what we plan to do with "the 1 st Annual Last CoCoFest"! 
So join us in a show of support for the Community, enjoy a 
weekend of fun, frolic, and fellowship, and make us start 
worrying about how we can possibly top this show next year... 



Sat May 30 

Sun. May 31 



10AM-5PM 
10AM-4PM 



INLAND MEETING CENTER 
400 E. OGDEN WESTMONT, IL 




For hotel reservations at the Clubhouse 
Inn ($52.95/nite, incl. free breakfast 
buffet, cocktail hour, & shuttle to/from 
the show) call 1-80Q-CLUB-INN. 
CoCoFest Group number is 883. 



Tickets are available thru May 1 5 at a special presale price of $ 14 for a one-day pass, or $ 1 7 for a two-day pass (prices 
at door $3 higher). Add S3 handling per order. Ticket prices for the Friday nite "Party with Marty" are TBA. For ticket ] 
ordering using VISA or MC, call (313) 482-8128 10 AM-6PM EST, or write CoCoFest, PO Box 763, Ypsilanti, Ml 48197 



CoCorest is a division of DNM Enterprises, Inf., a corporation in the state of Michigan. 
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CciCd 
Consultations 



Mult (lech Modems 
^^k / /iciiy a Multitech modem that ap- 
^K^pcurs to WWit CQfTtCtfy in all re- 
spects except that the AT&WQ command does 
not appear to work. Instead of storing set- 
up parameters and yielding an OK response, 
it gives an Error response. All other com- 
mands sm this Multitech 224HII modem 
work fine. 

Dennis McMillian (cocOKtwi) 
Pittsburg , California 

A Many, it' not all, of Multitech's 240G- 
and 9600-bps modem s have two un- 
documented commands that affect the func- 
tion of AT&WO. These commands are AT&W9 
and AUWS. Typing AT&W9 locks out all fur- 
ther attempts to use atshO to write to non- 
volatile RAM in the modem. Note that 9 is 
adjacent toO on the keyboard, so it is easy 
to see how a missed atiempl to send AT£wo 
to the modem would give it the 
U ndoc Li i no nled a t S W9 comma nd th at w o u Id 
lock out all further attempts to use AT&WO, 
Although Multitech modems do suffer from 
this minor idiosyncrasy, and although they 
have a number of odd commands that are 
unique to Muhitech, they are generally 
highly Hayes compatible and as a group 
extremely rugged and reliable modems. In 
addition Multitech has one of the most 
honorable and professional technical sup- 
port divisions I have ever eu«.-ou rile red. 

Altering the Default Fonts 
^^k Is there any program that will allow 
^B\_ tne to edit the 80-column font that the 
GtMK chip displays on the screen? 

Greg Seese (DAKlfAZARD) 
Chicago 

A If you are referring to the font dis- 
played whentheGIMEehipisin text 
mode, the answer is no. The GIME chip 
derives the font it displays from a character 
generator ROM dial is part of the GIMR 
chip itself. There are no provisions for 
adding an external character generator ROM 
to the G I ME chip, as there were with the 
VDG chip used in the CoCo I and 2. The 
font in the G1ME chip (which 1 personally 
find ugly and hard to read ^specially when 
displayed on a monochrome monitor) was, 
I he] ieve , c reatcd i n order to m itumtze an i - 
fact color generation when displayed as a 
32- or 40-eolumn font on an NTSC color 
TV. Unfortunately this consideration forced 
creation of an unusually ugly font for dis- 
play on other monitors. 

The only way to get another font if you 
are using Disk BASK' is to put the GIME 
chip into one of its Hi-Rcs graphic modes 
and, using software, make your own char- 
acter generator and positioning codc r This 
is available to a very limited extent with 
BASIC. A few programs (most notably 
VTerm, an excellent commercial VTI00- 
Lompatihle terminal prog rain, and 
i'eirwritt ,'■ Sit. a lightly flawed and all hm 
forgotten enhancement to Telewriter 64) 
have built-in provisions for use of a soft- 
ware font. Indeed, the display when using 
\*Term is superb and is one of the reasons T 
use it extensively. VTernCs font is drawn 
two pixels wide, as opposed to the one- 
pixel wide font used hy the GIME chip. 
This eliminates the dotty look that the ver- 
tical parts of characters suffer from when 
the GIYIL chip fom is used wti i .■ mono- 
chrome monitor. Unfortunately most au- 
thors do not have the time, energy or skill to 



implement an efficient software-based 
character generator i n t hei r appl icat ions for 
Disk BASK' or are scared to do so. fearing 
the result would be too slow to permit 
imnmhopor.:i; iunofthe iCSt of the program. 
With OS- 9 Level II you can use a soft- 
ware-based character generator that is part 
of OS-9 itself and specify any character 
font you desire Ho wever, many OS-9 users 
prefer not to do this because it adds signfi- 
cantly extra processing lime and slows the 
application. Note that this is more of a 
prob] em wj th OS-9 . wb ich may be try i ng to 
liandle many programs at onee, than it would 
be with Disk rasic + which typically is 
running only one program at a time. 

Readdressing 1>C Modem Paks 
^^ Ht >n do I change the address of a DC 
^B^ Modem Pak that has been converted 
to an RS-232 pack so I can use it on a 
buffered Y cable I made? 

Harlin Linke (HARLIN) 
Mainstee, Michigan 

A If you are u s ing one RS -232 Pak , you 
don't need to change t he address. The 
converted RS-232 pack will work fine on a 
Y cable with a disk controller. If you plan to 
use two RS-232 Paks on the same cable, 
you will have to he sure that each is ad- 
dressed differently. The standard address 
for a CoCo RS-232 Pak is SFFbft Through 
SFF6B. This is the four-address range that 
the Tandy RS-232 Pak uses, and it is the 
four-address range that commercial CoCo 
PRO! RS-232 packs have, too. There is a 
secondary range ($PPbC through SFF6R 
that is used by the /t3 driver with OS -9. 
This address range is the one used by a DC 
Modem Pak when it comes right out of the 
bo\. In the conversion Lo an RS-232 pack, 
one of the operations performed is to change 
the address of the pak to make its port 
addresses conform to those of the Tandy 
RS-232 Pak. Specifically, a trace to the left 
of the ROM chip is cut, and two wires go 
from pins I and 2 of the 74LS04chipto the 
two sides of that interrupted trace. If you 
merely disconnect those two wires that go 
to pins 1 and 2 of the 74LS04 chip and 
connect them to each other (thereby restor- 
ing that broken trace to the left of the ROM 
chip), you will have restored the DC Mo- 
dem Pak T s addressing to the SFFttC through 
SFF6F range. This will allow it to work on 
the same bufferred Y cable with a genuine 
Tandy RS-232 Pak. 

Serial Mouse Tor CoCo 
j^^k Bath the one- and two-hutton Color 
^E£ Computer mouse are no longer avail- 
able at Radio Shack. Is there any simple 
way to use the serial mouse Tandy offers for 
its PC compatibles (Catalog No. 25-1040 
and 25-1042) with the Color Computer? 
Jerry Blakley (JtfLAXELY) 
Salem, Oregon 

A Sorry, Not with Disk BASIC anyway. 
All serial mice use an entirely differ- 
ent electronic scheme than that used by the 
Color Computer mouse. Seria] mice send 
streams of pulses lo the computer, where, 
these pulses are interpreted by software in 
the computer as positioning information. 
The Color Computer mouse is actually a 
joystick mechanically disguised as a mouse, 
which sends two voltages on the X and Y 
axis in the same way as a joystick. Conver- 
sion between one and the other kind of 
mouse would be moderately elaborate, 
electronically. It is not a simple matter of 
changing connectors. 

lfyouuseOS-9,you might be interested 
to know there are two groups of files in the 
OS9 Online databases for using a serial 



moose under that operating system. Writ- 
ten by Bruce Istcd,. these files in elude 
patches to the operating system that allow 
you to use standard serial mice with an RS- 
232 Pak on the Coco, 

Inupjjraded Multi-Pak Symptoms 
J^fe In several of yew articles about 'CoCo 
^E£ 3 upgrades for the Multi-Pak Inter- 
face, you went into detail about just what 
the upgrade does, electronically. However, 
you were at best vague about what symp- 
toms one would expect when one tries to use 
an unupgraded Multi-Pak with a CoCo 3. 
Can you be a bit more specific in this 
matter? 

Michael Wright (MWRtGHT) 
Nacogdoches, Texas 

A In a word, no. The fact is that while 
there are very sound theoretical rea- 
sons to insist on upgrading both models of 
the Multi-Pak, the same theoretical consid- 
erations would predict that, at least for a 
while, an unupgraded Multi-Pak (especially 
an unupgraded 26-3124 Multi-Pak) might 
work with a CoCo 3 without any obvious 
symptoms. However, some have argued 
that, eventually, use of an unupgraded Multi- 
Pak will damage the GIME chip. 

I've received a small smattering of occa- 
sional reports of weird* subtle, intermittent 
system quirks (especially with OS-9-based 
systems) that disappeared when the owner 
finally upgraded the Multi-Pak. The earli- 
est Mufti-Paks (Catalog No. 2f>-3024) had 
an early revision of the PAL chip that 
literally would not permit operation with 
CoCo 3's if the disk controller was in Slot 
4, On those, the symptoms would be quite 
obvious: The system would not work. But 
later revision 26-3024 Multi-Paks and all 
26-3124 Mulli-Paks appear to work cor- 
rectly without the upgrade. I still strongly 
urge that all Multi-Paks, if they arc lo be 
used with a CoCo 3, be properly upgraded. 
Note that CoCo PRO! is a source of upgrade 
PAL chips for the old 26-3014 Multi-Pak. 

Downloading Orchestra 94) Files 
^^k / wax /laving trouble with my Orches- 
^E£ tra 90 pak not being able to read 
Orchestra 90 files f had downloaded from 
Delphi. Looking for help. I deselected all 
topics in Forum except Music, then started 
reading all messages to see if someone had 
encountered a similar problem and solved 
it. In March 19H9, someone had asked a 
question tike mine, and someone else had 
answered it. ft turns out that saving the file 
without an extension after its name cures 
the problem. The Orchestra 90 pak will 
then recognize the file and not give the Disk 
Error message I was getting in previous 
attempts. 

JohnL Wilkersonjr. (fWtLKBRSQN) 
Rcynoldsbutg. Ohio 

Cnmmndnre Serial Interface, 
Revisited 
4^k In the December 1991 CoCoConsul- 
^f union column you had a note about 
the serial port on a Commodore-specific 
SL-IOC printer. While the spirit of your 
answer was more or less correct, the an- 
swer was in error in some details. The 
Commodore serial port is, as you correctly 
noted, a TIL- level protocol, and it is diffi- 
cult to get one to work with a CoCo serial 
port. However, it is a lot more difficult than 
you implied. Commodore's serial port is 
not of the RS-232 variety, but rather is 
closer to theIEEE-4S8 standard and repre- 
sents Commodore' s "cost- reduced" serial 
version of that parallel interface standard. 
At one time there was available a widget 
that would allow use of Commodore -spe- 
cific printers with PC -compatibles. I don ' i 



know if this widget is still available. Given 
the relatively low cost of new and used 
printers, I would agree with you that the 
best thing, if you have such a printer but 
don't use Commodore computers, is to get 
rid of lite aid printer and buy -i more Stan 
dard one. 

Lonnie McClure (IMCCWRE) 
Little Rock, Arkansas 

Adding Keys to the Keyboard 

^^k My CoCo 3 keyboard has been giving 
^E£ me increasing problems lately, and I 
have decided to try to use a CoCo 2 key- 
board that I have lying around. How do I go 
about attempting to add ALT. CTRL. FI 
and F2 keys to that keyboard? 

Phillip Brown (THEFERRET) 
Berkeley, California 

A The four added keys arc on the same 
row of the keyboard switch matrix 
serviced by Pin 8 of the keyboard ribbon 
cable, that in turn goes to Pin 8 of the 
keyboard PIA on the CoCo 3. The ALT. 
CTRL. PI and f'2 keys .;re. respectively. 
attached tothe columns serviced by pins 1 2 T 
13, 1 4 and 15 of the keyboard ribbon cable> 
wh ich in turn connect to pin s 1 3 , 1 4, 1 5 and 
16 of the keyboard PIA chip. Thus, connect 
one side of a] 1 four key switches to Pin S of 
the keyboard cable or Pin 8 of IC5, then 
connect the other side of the four key 
switches to the appropriate pin on the key- 
board ribbon connector or the appropriate 
pin of IC5. Mounting and positioning may 
pose some mechanical challenges, but you 
can, if you persist, use a CoCo 2 keyboard 
with the added keys, 

UnarehivirtR Utilities 
^^k I ' ve seen various questions on Del- 
^E^. phi about using a CoCo to unarchive 
the three common IBM PC- type archive 
programs : P KZ I P , ARC and L H A R C A Ithough 
you are right that no software exists for 
Disk basic to handle such files, we do have 
OS-9 software that can unarchive PKZIP 
and ARC files. There is even a utility called 
os9a re that can create ARC files on a CoCo 
tunning OS-9. Tve seen a utility for OS-9* 
68000 that handles LHARZ- type archiving 
but none for OS-916809, 

EdLanxcnhuck (TtteSANDWtaO 
Columbus, Ohio 

TTL Monitors and the CoCo 3 

Jj^^k Can IBM .■-.:* 77 L morio( 
^d monitor be used with a CoCo 3 by 
merely rewiring its connector? 

Greg Seese (DAKMA2AHD) 
Chicago 

A No. The re are two problems involved 
in attempting to use a TTL mono- 
chrome monitor with a CoCo 3, The first h 
one of signal protocol. IBM monochrome 
monitors use two TTL-tevd inputs (Lumi- 
nance and Intensity) for information about 
the luminance of the signal, where the 
CoCosRGB output has three analog-level 
sign a I s for t hi s information , and the CoCo ' s 
NTSC video (RCA jack) connector has the 
luminance information merged with color 
and sync information on a single line. 

Kala Software was, for a while, selling a 
very clever device that converted the video 
signal from the CoCo RGB port and proc- 
essed it for use with a TTL monochrome 
monitor. However, even this device suf- 
fered from a second problem: IBM TTL 
monochrome monitors sync at a higher 
speed than the video put out by the CoCo. 
The C.iiCu'* video has a horizontal ^yrn; 
rate of 15.75 KHz. but an IBM TTl . mono 
chrome monitor syncs at near 19 KHz, 
Some IBM TTL monochrome monitors 
will accept a 15,75 KH? sync signal, while 
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most others can be tweaked to aixepl such 
■d signal by adjusting Ihe ferrite slug in the 
horizontal oscillator circuit inside ihe 
monitor. However, even after such tweak- 
ing, the monitor will display an image that 
occupies only about the center two-thirds 
of the screen, due to the difference in types 
of signals the monitors were designed to 
use. 

•» A •» A 



Live and Learn: A CoCo Repair Story 
i was online with Delphi answering a 
hardware question I had just received via 
MaiL The question called for me la pull out 
my notebook with the CoCo 3 schematic 
and other technical information, I laid the 
notebook down on my somewhat cluttered 
computer desk, examined it. and began to 
type my reply to the person who had asked 
the question. 

After typing a word ortwo< I he keyboard 
locked up, producing at first only a letter or 
two per word, then finally nothing. Cheek- 
ing my modem lights, I saw no characlers 
being sent to the mmiem. so 1 turned my 
system off and back on, 1 got the Disk n a.sic 
copyright message, but the keyboard still 



would not work. Rather curiously,, ahhough 
the keyboard was totally locked up, CTRL- 
ALT-Reset still worked. That is, 1 tnuHl 
still get a cold start when I held down the 
CTRL and ALT keys while pushing Reset. 
Somehow the computer was seeing at least 
those keys during its start-up sequence, but 
after that would fail to see any keys on the 
keyboard. 

1 use a keyboard on an extc nder cable, so 
I checked all connections on the cable. All 
seemed correct, I tried plugging in a spare 
keyboard right at the main keyboard con- 
nector. Still nothing, I assumed the key- 
board P1A was dead. Since T have all the 
chips on my CoCo 3 socketed and keep 
spares on hand for all of them, 1 popped our, 
the keyboard PIA chip and replaced it. Still 
the keyboard was dead. I then removed my 
1-Meg upgrade and replaced it with a stan- 
dard 512K upgrade. Still nothing. 1 re- 
placed t he 6809 ch i p. Sti 1 1 no impro v citil-ti t. 
I replaced the 74LS30 chip involved in the 
keyboard interrupt circuit. Again, no im- 
provement. 

In the course of all this, I managed to 
knock loose ihe socketted 74LS04 chip, 
and so for a while the computer was totally 
crashed. I soon located that jostled chip (il 
bail a 74LS02 piggybacked on top of it to 
generate a combined negative sync for 



certain RGB inouUors. and- this pip l^ kick 
was what got hit while 1 was swapping 
keyboards around) and reseated it in its 
socket. 

I was getting upset and frustrated, and 
was about to give up and remove the CoCo 
from its site and replace it with a spare, 
when I realized that I had placed my CoCo 
tech-reference notebook right on top of one 
of my joysticks! It was pressing one of the 
joystick buttons. Upon moving the joystick 
from under the notebook, full keyboard 
function returned. 

Mote that over the last many years I have 
on several occasions advised users how 
pressing the joystick button could lock up 
the keyboard. It's something I knew well, I 
just forgot about this obvious and easy-to- 
fix cause of keyboard problems when prob- 
lems struck my computer. 

This rather dumb mistake that I made 
was paradoxically aggravated by my hav- 
ing a computer where ail the chips were 
conveniently socketted. 1 had years before 
■iOckL-icixl all the chips because this was a 
development computer on which 1 was 
lesiing various hardware projects. I wauled 
to be able to both modify and repair it 
quickly, for on occasion some of my proj- 
ects would *ap a chip or two in the CoCo. 
Because chip replacement was so easy on 



this mac hi ne, I d id not even h a ve to move it 
from its original site. Had this been an 
ordinary stock CoCo with all the chips 
soldered directly to the motherboard, I 
would have had to unplug the machine and 
move it to a work bench for disassembly. 
Had 1 moved the machine, I would have 
started by unplugging the joysticks, and of 
course the machine would then have imme- 
di at ely re su med normal keyboard f u net ion. 
Because il was so easy to start swapping 
chips on this development machine, 1 
managed to waste an hour or so madly and 
frustrated ly swapping one chip after an- 
other before I realized the totally trivial 
cause of the problem — and even managed 
for a while to create a real hardware prob- 
lem where none had existed when I jostled 
that 74L504 chip. 



Martinll, Goodman, M.D., a physician 
trained in anesthesiology, is a longtime 
electronics tinkerer ami outspoken com- 
meniator — sort of the Howard Coseli of 
the CoCo world. On Delphi. Many is (he 
SiGop of THE RAWBOw's CoCo SfG His 
non-computer passions include running, 
mountaineering and outdoor photography . 
Marry lives in San Pahlo, California, 



For your CoCo or MM I compatible computer J 



We will beat any advertised price! 



Brand New Program! 

Sink the Armada Tills manuVs test buy] 
Imagine playing b iL ill i: ship where SODtC missiles 
art duds J Includes point ft click interface and 
beautiful 3-D screen objects! Req, CoCo 3 or 
100% compatible tv/2S6k, RGB monitor disk 
drive, mouse/joystick, OS9 Level 2 <& Windmt 



TV for OS*) Level 2 m View one file while 
working on another. i*ages/scroiis back & forth 
through text files, Fits file* in any winduw. 
Req CoCo 3 or 100% Compatible w/I28k, disk 
drive, & QS9 Level 2. $S<95> 

High Flnam* m The flgST CoCo financial 
analysis: software! Req. CoCo 5 or 100% 
compatible w/12Sk r disk drive, mouse/joystick, 
&OS9l£vel2w/Windint $24,V5, 

M.V Banner Mil I Li V Lie banner program! 

Req CoCo 3 or 100% compatible m25fft 0S9 
Level 2, disk drive, Multi-Vue, 80 CoL monitor, 
A mouse/joystick, $1&95. 

WP She! Multi'Vut style interface from 
which you access any OS9 Lent editor, fur/mailer, 
& spelling checker (thai you supply). Req. 
CoCo 3 or 100% compatible w/256k, disk drive, 
OS9Level2, A Windintr WMSS. 

OS9 Calendar Utilities f>isplay your 

schedule automatically on start up & perform 
routine tasks on fJtal data, files. Use w/Gcal, or 
alone. Req. CoCo 3 or 100% compatible 
w/12Sk, disk drive, AOS9Levei2- *14.*5. 

DeskTamer M Includes: card file, note pad, 
phone list/dialer & scheduling system!' Req, 
CoCo 3 or 100% compatible w/5I2k, disk drive, 
0S9 Level 2, & Windint. Modem req. So use 

phone diaieTr $34.95- 

OSV Budget System Track ft anaJJFB 
financial transactions & prepare reports. Req, 
CoCo 3 or 100% compatible w/256k, disk drive, 
&OS91*vel2. St^.95. 



OSK Versions Available! 

OSf* Level 2 Game Pack Sea tiacde. 
Minefield, Knightsllridge, CcrCothellu r ft Dice 
Poker. Beautiful color graphics & mouse 
support! Req. CoCo 3 or 100% compatible 
w/256k, disk drive, &. OS9 Level 2. S314& 

OSK version req. MM! or 100% compatible 
computer. disk drive, OS9-6SO00, &. 
mouse/joystick S47 r M5[ 

Variations of Solitaire M Pyramid, 
Klondike, Spider Potoer. and Canfield. 
H i*j i lc i M 1 1 colnr graphics & mouse support! Req. 
CoCo 3 or 100% compatible w/25ok. disk drive. 
OS9 l^vel 2, A mouse/joystick 132,95* 

OSK version req, MM1 or 100% compatible 
computer, disk drive, OS9-680OQ, £ 
man xe/joy stick S^JWJ 

***** 

Send for free catalog! 



All products carry the Rainbow Certification 
Seal VISA and MasterCard orders accepted. 
Please add $230 (US.) or $500 (foreign) for 
shipping and handling. Colorado residents 
please add applicable sales tax.. Prices subject 
to change without notice. 



MV Systems 

P.O Box 818 
Arvada, CO 80001-0818 



(303) 420-7777 
The OS'Jcmd Mutti-Vue Specialists! 



# 
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SOLITAIRE CARD GAMES 
DuoDeck: Double Deck Solftarres. 
Play Sly Fox or Windmill - boih games of skill. $19.95 

Classic Solitaire: Klondike, Canfield and 
Pyramid on one disk for just $14.95 

La Belle Lucie: A true game of skill. $1495 

All three play on 1 28K CoCo3, with 
joystick and disk. 

SAVE $10.00. BUY ALL THREE FOR $40.00 

BgK3j Deception Path 

!ss Spend time with your family navigating the ever-shifting maze. 
Eh£S Play competitive or n on -competitive. 128K CoCo3 $19.95 

Armchair Admiral Battleship for your CoCo3 $14.95 

Games Pack Hangman/Concentration/Mastermind Coco2/3 $10.00 

ARCADE 

SOVIETBLOC: Super Tetris-style game. Cccc3 $19.95 

Zen i it $29.95 Crystal City $34.95 



Give us a call and 
stop by our new 
„ -ofice in downtown 
Kyum-Gai (To Be Nmja) $29.95\ Marysville 



OS9/LII 

Tazrnan 



{51 2K) 1 

S24.95 



T-SHIRTS 
We still nave some custom-designed T-shirts left. 

Only $7.00. Adult sizes only. Please state 

size/design preference. Tazman ■ a space design. 

Armchair Admiral - an old sailing vessel. 

Silverglade ■ a fantasy scene. 



Supporting the 

Coco3, TC-70 

andMM/1 



Software 

submissions 

Checks, Money Orders, MasterCard & Visa $2.50 S&H invited 
COD S200 extra. WA addresses add 8.2% sales tax. 

/iwc\ eco coo Eversoft Games, Ltd 

(206) 653-5263 p Q Box 3354 

98223 



30 day money back guarantee Arlington, WA 



ADVENTURE SURVIVORS! 

This is your newsletter! Only $3 per 

year. Reviews, solutions, and more! 

Call or write tor details. 



L,E. Padgett 

24 Perthshire Dr. 

Peachtree City, GA 30269 

(404) 487-8461 
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PMODE continued iTom Page 1 

generally execute faster than their GAS EC 
counterparts. I decided lo modify the ML 
version to handle the raster graphics ac- 
cepted b> the LaserJet. Though 1 don't 
amsider myself lo be a programmer, I found 
il quite easy to revise Bill's program* and t 
was immediately taken by the power of 
machine language. 

More recently 1 made some changes to 
the original program so it was specifically 
set up for my system. As a challenge, I 
decided lo restructure Bill's screen-dump 
routine to work with IBM/Epson-compat- 
ible printers. The result of these efforts is 
shown in listings I and X I've added the 
comments so others may leam enough to 
make ihcir own modifications. 

After working on these programs, I 
wanted to sec ju st h ow much f axtc r mac h i ne 
language is for producing screen dumps. I 
compared the speed of Bill's BASIC pro- 
gram with my Tandy version of the ML 
program at various printer rates and with 
the CoCo operating al normal and high 
speed. I used a Tandy DMP- 1 30 primer for 
my teste, The results are shown in figures 1 
and 2, 

The times reflected in these figures indi- 
cate a great deal of overhead in the process- 
ing of graphics data through basic Con- 
sider lhat running the CoCo at high (double) 
speed halves the output itme. Notice also 
that ihe times for the machine-language 
version do not appear halved. Actually ihey 
aire — the physical characteristics of the 
DMP- 130 are the real limiting I aclor. Much 
faster times can be achieved by using a 
faster primer w ith a larger data buffer (say, 
8K). 

I think the figures speak fur themselves, 
but I would liVciopoini out that 46 seconds 
is hardly lime enough to make a cup of 



Submitting Material 
To Rainbow 

Co-i iLritnj turns to mi. juinhqw mu v*d 
come rmin evervtme. Wc like hhuh :i vnritiy 
of pro-grams thai are useful, helpful and fun 
for of her CoCo owners, 

WHAT TO WRITE: We are imcrcsicd 
in what you want to tell our readers. Wc 
aCCcpl fur cwtsidcTaiion anything ihal h well - 
written and has a practical application for the 
Tandy Color Computer It' it interests you. it 
will prubiihly interest lots of others. However, 
we vastly prefer articles with accompanying 
programs that can be entered tUKl TOrt. The 
more unique the idea, the more the appeal. We 
have a continuing need for short articles with 
short listings. These, ate c&peciafly ^pealing 
to uur many bcgmiwrs. 

FORMAT: Program nurHrli^Kins trnisl 
be on Lane or disk, mid it is best Uy make 
several saves, at Lcflsi one "I'shem in ASCII 
format. We're sorry, bul we do not have time 
to key in pro-crams and debug our typing 
errors. All programs should be supported by 
some cditoriil commentary ^plaining how 
the program wocfes. We aim prefer iliac ediip- 
rial copy be included in ASCII lormat on the 
iaper>rrJisk, using any of the word processors 
eunendy availahlt for ihe Color Computer. 
Al w. please i tic lude a dnithlc-spiiccEJi printoul 
of your editorial material and program listing. 
Do not send text in all capital letters: u^c 
upper- and lowcreaHc. 

COMPENSATION: Wcdu pay foffflt^ 
missions, based on a number tif criteria. Those 
wishing rrniuiirrjliun should » tttOS When 
making Submissions. 

For rtw benefit of those wanting mcirede- 
lailed Jnfomiation on making subnmsiotix. 
please send a self-nddicsw.tL slumped envc- 
Jiip* (SASBl io: Suhmis^ion GukfeHiKE. rHU 
KiUN K*, The Pa3 soft Bu t'dmg, P.O. Box 3315, 
Pumped, K Y 4nn,so. w f will *eml you com- 
prelvensive guidelines. 

Please do not nubmil material cutTcnlly 
submitted to another publication. 



tJaffett. I can drive to the corner stun: and 
bin ihe coffee in less than 19 minutes. 

PMODE4: Pages and Images 

While ihe PM00E graphics screens are 
nor on the cutting edge, especially ennsid- 



10 print Ihe wxoiuJ image or both images 
together. 

Tandy vs. IBM/Epson Printers 

Most low-end dol-matrix printers n.se a 
nine-pin head to form ihe printed output. 



TANDY DMP 
(7 -pin Graphics) 



/fyr" 



IBM -Epson 
(S pin Graphics) 



Graphics Byte 
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ering the CoCo 3*8 capabilities* all Extended 
BASIC Color Computers sttpfhiTi them. Ttus 
PMQDE4 graphics mode supports a screen 
resolution of 256 pixels (picture elements) 
horizontally by 192 pixels vertically. Only 
two colors can be used to create images in 
PHDDF4. (Artifaciing cdors allowsa wider 
array of shades and hues for onscreen im- 
ages. However* artifact colors are possible 
only because of limitations inherent lo color 
TVs and composite monitors, and they nre 
generated using only two colors on the 
P«ont4 screen. This, by the way, is why 
older CoCo software that appears hi color 
mo ihe CoCo I and 2 appears in black and 
white when used on the CoCo 3 with an 
RGB monitor.) 

The PMODE graphics screens arc allo- 
cated in 1536-bytc pages, and PH0.DE4 re- 
quires four pages lo display a full-screen 
image. A full image therefore occupies 
6 144 bytes (6K) of memory. Extended ba- 
sic provides support for a total of eight 
PMODE pages, but not all Color Computers 
can use all eight pages. For instance, be- 
cause of memory [imitations, a 16K CoCo 
supports only four pages — this machine 
can hold only one PM0DF4 image. Tf your 
CoCo has at least 32K, however, you have 
access to all eight pages. You can store two 
complete PMQDE4 pictures and have the 
computer display them at will: one in pages 
I through 4; another in pages 5 through 8, 

In a disk-based Color Computer* the 
first PKODE graphics page starts al memory 
address S0E00 (the dollar sign indicates 
this is a hexadecimal value). In tape-based 
systems, the firsi page starts at S06GG. The 
East memory location used in a single PHQDE4 
image is $25FF for disk systems and SI DFF 
forcasselte systems. This location holds the 
last byte in Page 4. The contenlsof memory 
locations SBA and SBB reflect the starting 
address of PHODE graphics. 

The fifth page of P MO D £ graphics starts at 
Address $2600 (disk) or S1E00 {cassette). 
The last byte of PM00E graphics memory 
(the end of Page 8) is at Address S3DFF 
(disk) or S-3.5FF (cassette). At least one 
graphics program for the Color Computer 
GjCu rVfetv, combines ail eight pages to 
achieve a working area that is two screens 
in height. The screen dump we'll look at 
shortly is written lo print only the first 
image. However, it can easily Ik modified 



Each pin is driven eleclromechanically and. 
when fired-, makes an inked impression (in 
the shape of a dot} through the primer 
ribbon. The pins are arranged in ihe print 
head so thai if all ninepins fired at once, the 
result would be a vertical line nine dots 
high. 

In general, nine-pin print heads use Ihe 
lop seven pins io form a sewn » lot -high 
character, flue hotlnm two pins arc nor- 
mally used for character descender* (the 
bottom parts of lowercase tetters such as g. 
p,q and y). For graphics priming, however. 
the number of pins used (and how ihey are 
addressed) depends on who made/markcled 
the printer. 

When in the graphics mode, earlier 
Tandy dot-matrix primers use a path that is 
seven dots high. The bottom two pins are 
not used for graphics priming. In contrast, 
IBM/Epson-compatible printers print a path 
that is eight dots high. Only the bottom pin 
is normally unused, though most of these 
printers also support a nine-pin graphics 
mode. 

You would think using a different num- 



hcr of pins for graphics would nut cau,se a 
big proh! em. A ftc r a 1 1 , y »u shou I d be able lo 
just write the program in such a way that il 
u 56SO nc in t ire nr oi ie less pin. Cumpl icat ing 
things somewhat, the way the pm\ tie 
addressed is reversed between Tandy and 
IBM/Epson printers. 

As shown in Figure 3. when the com- 
puter .sends a byle of graphics data to a 
Tandy printer, the least significant bit (LSB; 
ihe right-most bil) is sent lo the top printer 
pin. The second pin from the top receives 
ihe next bil. This continues down to the 
seventh pin (bil). The most significant frit 
{ M SB ; 3 eft-most bit) is not u sed to Fire a pin. 
Rather, Tandy prinieni use this bit. which 
carries a decimal weight of 128, to indicate 
that the byte is graphics data. 

On ihe other hand, IBM/Epson prinieni 
send the MSB to Pin 1 (the top pin). The 
se veuth bit (B it 6 ) i s sent to Pin 2 . and so on. 
In addition, since these printers use alleighl 
bits s the MSB is nor used to indicate the byte 
is graphics data. 

What Hire the tradeoffs? The IBM 
scheme uses more bits, so more data is 
printed in each pass and ihe entire screen 
dump doesn't take as long. Bui in order for 
ihe printer to correctly interpret the dala, 
you must tel] the IBM/Epson printer how 
many graphics byies you plan to send for 
each line. You must also set ihe linefeed 
distance (the vertical "roll" of the printer) 
for eight dots. Tandy's approach allows 
you to s.el the printer lo a graphics mode, 
which has a built-in linefeed selling. Then 
you can send as many bytes us you want — 
as long as the MSB is set in each one. 

Which is the righl way? Ii doesn't really 
matter as long as you know what you arc 
dealing with ,md how to handle ihe situ- 
ation, However, in ihe inlereM of standards. 
I feel it is fortunate that all of Tandy's 
newer dot-matrix printers sttppofl ihe IBM/ 
Epson approach. In fact, the newer DMPs 
don't even huw a Tandy mode. 

The Programs 

The assembly-language programs show n 
m listings 1 and 2 are for printing screen 
dumps of PMQDE4 screens. Listing I shows 
the version for older Tandy DMP-series 
printers and Listing 2 is for IBM/Epson 
printers (or Tandy primers set to the IBM 
mode). For those without an assembler, 1 
have included listings 3 and 4. These BASIC 
programs create the machine-language 
programs for Tandy and IBM/Epson print- 
ers, respectively. If you go litis route, run 
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teise 




ORG 


13000 




W..V 


PRINT 


ECU 


ja>'.;.- 


address of printer routine in ROM 


0B128 


START 


LOi 


#-S 


select the printer as the current device 


BBI3B 




STA 


S6F 


device-select location 


wm 




IDA 


#1 


baud value for 9600 baud 


mm 




STA 


J9« 


poke address fur printer baud (150 decimal 1 


0B16B 




LO* 


#18 


Tandy printer code to select graphics node 


8017f! 




,1SB 


[PK1T 1 


send code 
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!BA 


point to the start of PHfiDE graphics pages 


W2m 




IDA 


HJ 
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STA 
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I OOP 3 


IDA 
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Tandy control code to 
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[PRINT] 
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IDA 
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move the printer head 
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IDA 
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to the right 
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J SB 


[PRINT] 
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LDA 
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S0 dot spaces 
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1 il 


PR11" 1 
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LDA 
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set the nunber of bytes per line lo 32 
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STA 


RON, PC Ft 


store bytes -per- line value tn Variable ROM 
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load B with no- of columns (hitsi per byte 
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mow 


an 
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clear VALUE (the graphics value to be printed! 
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get the first vertical bit In the column 
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SIT* 


B.I 


AN0 first bit ul th B,K to see If It is set 
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SEQ 


NEITJ 


if first bit is nut lit. gotu Label NCUTZ 
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VALUE, PCR 


if lit. set lou bit {top printer pin) in VALUE 


00380 


»EXT2 


LDA 


32.11 


get the second 1 vertical bit In the calunn 


00390 




BIT* 


e.x 


AND Second bit to see If it is set 
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BEQ 


'lr I - ■ 


if 2nd bit not Ht, goto Label NEH3 
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LDA 


VALUE, PC B 


if It Is lit. load VALUE Into A register 
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the appr o priate basic loader — it automati- 
L/jjEly saves the ML routine to disk. The 
programs shown in all tour listings are 
designed for printing a I 9600 baud. If your 
printer is set to a different rate, read the 
Modifications section below before run- 
ning either version. 

As written, both screen-dump programs 
are designed to load into memory starting aL 
Address $3000, Before loading cither ver- 
sion, however, you must have an image on 
the graphics screen to print. If you have a 
basic program that draws a PmuDF 4 screen, 
run it attd press BREAK after the screen is 
drawn. If you have a standard PM00f!4 screen 
already saved to tape or disk, simply LOADM 
(or CLOADM) the image. After the picture is 
inmcrnory T enterCLEAR £00, &H3000 lor 
CLEAR 200.SH2FFF to reserve space forthe 
ML program. Now LGADM (C LOADM) the Ml, 
ro ut i ne and enter E x £ C . You ' 11 soon see the 
PM00E4 image on paper. However, as with 
Bill Nce's original work, the Tandy version 
does not print the bottom three dot rows of 
the image. 

Modifications 

Both TAMDUMP and 1BHDUM Pare designed 
to send data to the printer at 9600 baud. If 



your printer is capable of operating (and is 
sel in reeeive) d;ji:i :at a different rale, you 
must make a simple modification, ("hangc 
the value in Line 140 of either assembly- 
language listing from #1 to the appropriate 
poke value for the rate your printer uses. (A 
chart yf poke values for various baud sei- 
t i tigs appears on Page 23 of the April 1992 
issue.) If you are using one of the BASIC 
loaders, change the sixth data value in Line 
100 from 1 to the appropriate value before 
running the loader program. If you are 
using a tape-based system, you must also 
change SAVEM in Line 40 to CSAVEM. 

Both versions of the PMQDE4 screen-dump 
routine are written in position independent 
code (PIC). What this means is that the 
programs can be loaded into any area of 
user-available memory. If you have a CoCo 
with al leasi 32K, and ihis includes the 
CoCo 3* you can load cither routine with an 
offset to place it al Address $7000. To do 
this, firstchange the C L EAR statement given 
above to CLEAR 200.SH70QO-1. Then enter 
(C)LOADM "TAN DUMP** .&H4000 or (C)LOADH 
"IBMDUKP" b £H400Q. 

To make this change permanent, change 
the ORG address in either assembly-language 
listing from. 13000 to 17000. For the BASIC 



program in Listing 3, in Line 10 change 
&H3000 to SH/000 and SH30F1 to &H70F1. 
For Li sting 4, in Li ne 1 change & H 30 to 
&H7000 and SH3ur to &K7MF. 

When graphics images are drawn on the 
PW00E4 screen, a bit that h set actually 
appears while (the background is black). 
Since most of the drawing packages 1 use 
draw black on while, I have written the 
machine-language programs so that they 
invert the image. To re invert the image. 
delete COMA from Line 750 in TANDUMP or 
Line 990 in I BMDUHP. Tn TAWDLJMPB, change 
the only occurrence of 43 in Line 1 30 to 12. 
and in [BMDUMPB, change the only occur- 
rence of 43 in Line 1 50 to 1 2, Th is st uf f s an 
assembly-language WOP instruction in place 
of the COMA, effectively deleting the inver- 
sion. 

To increase speed, users with Tandy 
printers that feature an IBM mode can set 
the printer for this mode and use the IBM 
version. You may warn to alter [ BmOumP to 
automatically switch the printer to the IBM 
mode. Just send the appropriate control 
codes in the same way the program sends 
the others. 

To alter the programs to print a two- 
screen CoCo Max picture, change the 



number of printed rows in the assembly- 
language Listings. 

Bill Nee provides some background 
information on program structure in his 
orig ina I article. To gel i nf orm at ion on other 
CoCo device numbers, and to gain some 
insight on the usl- i»j" 3 1 : command ui AND 
val ue s , refer to the September 1 98 8 in stal I - 
mem of 'Machine Language Made BASIC." 

Summary 

A simple screen-dump routine is not a 
complex programming task, and because 
the process is so straightforward, 1 find it is 
an excellent starting point for novice as- 
sembly-language programmers. Use the 
control-code table for your printer and 
experiment. Consider other ways you can 
use machine language to control the graph- 
ics screen. The possibi lilies are endless. 



Cray Augsburg is rainbow's managing 
editor and has an associate's degree in 
electrical engineering. He and his wife Ruth 
have two children and live in Louisville, 
Kentucky, Cray enjoys spy novels, music 
and woodworking. His Delphi username is 
CRAY 



OE4 20 




ADDA 


#2 


02430 




STA 


VALUE, PER 


00440 


Nun 


1 DA 


64. U 


00450 




BITA 


B.X 


00460 




a t0 


NEXT4 


084 7(1 




LEA 


VALUE. PER 


(124*2 




ADDA 


U 


00490 




STA 


VALUE. PER 


wm 


NEiri 


u:a 


96. U 


025 Id 




BITA 


B.X 


00520 




BED 


NEXT5 


00530 




LOA 


VALUE. PER 


,1 ,'-:m1 




ADDA 


K 


00550 




STA 


VALUE. PER 


aatsfl 


NEIT5 


LDA 


128. U 


00570 




BITA 


B.X 


(12 '32 




BED 


NEXT6 


00590 




1 DA 


VALUE, PER 


i!,'.:a,i 




infiA 


#16 


oeeio 




STA 


VALUE. PER 


00620 


NEXT6 


IDA 


166, U 


00630 




BITA 


B.X 


00 MO 




4i. 


MEXT7 


00 650 




LDA 


VALUE. FEB 


00660 




ADDA 


#32 


00570 




STA 


VALUE. PER 


00530 


NEXT? 


1 :>:. 


192. U 


new 




BITA 


B.X 


00700 




BFO 


PUNT 


00710 




LDA 


VALUE, PER 


007 70 




ADDA 


#6* 


00730 




S1A 


VALUE. PER 


00740 


PRNT 


LDA 


VALUE. PER 


00750 




■ riK.i 




HB/b0 




ORA 


ms 


007 70 




JS* 


[PRINT] 


00780 




DECB 




00790 




LBNE 


LOOP! 


00300 




Hj 


1.11 


32.813 




DEC 


Ran. PER 


00620 




LBNE 


L00P2 


00330 




LDA 


#13 


00840 




JSR 


[PRINT] 


3B5S3 




LEAD 


192. U 


oass-a 




DEC 


OOMH.PCR 


32 8 :,\ 




LBHE 


L00P3 


J2SS3 


FIN 


LDA 


MB 


iVi-V. 




JSR 


[PSIN1] 


00903 




CLR 


16F 


01" 13 




RTS 




10921 


KV 


r<"3 


! 


00330 


00UN 


k''f. 


1 


0354 8 


VALUE 


RUB 


1 


025. r,3 


VTABLE 


FOB 


12071 


025 !i3 




1EB 


10201 


03573 




ICG 


13810 


00930 




FLU 


(2040 


00990 




r:8 


$80 


a: MM 




INI 


STAR1 



set second bit (second pin from too) In VALUE 
store new print value in Variable VALUE 
get the third vertical bit in the column 

see if third bit is lit 

act accordingly 



get the fourth vertical bit in the column 
see if it Is lit 

act accordingly 



get the fifth vertical bit in the column 
see if it is lit 

act accordingly 



get the sixth vertical bit in the column 
see If It is lit 

act accordingly 



g^t -he- ^venth vert, bit [bottoi print bit] 
see if it Is lit 
act accordingly 



load current print value into the A register 
reverse all bits to invert image 
set the eighth bit If It isn't already set 
send the graphics print value to the printer 
decrement B reg. to Hove to next vert, column 
If not done with 8 colunns. go back to L00PI 
if done with B columns, point to next byte 
reduce nunber of remaining bytes per row by ] 
if not done with row (32 bytes), goto L0DP2 
row done; prepare to send a carriage return 
send <CR> to advance printer to next line 
skip down seven dot rows on the PMDOE screen 
reduce number of print rows by 1 
If not at bottom of image, return to LOOPS 
Inage done: load landy code for the text mode 
send code to return printer to the text mode 
reset device-select to select the screen 
return to BASIC or from whence you cane 
holds the number nf bytes per row (32) 
holds the number of 7-dot rows to print (27) 
holds the vert.- graphics value to be printed 
value table for checking if bits are set 



06270 

22 752 

00290 

72122 ,011 = 3 

00310 

00320 

06336 

00340 

063S6 

00360 

SB.i.'H 

00380 

00390 

00400 

00410 

00420 

00430 

00440 

00450 

89466 

00476 

00480 L00P2 

00496 L00P1 

00506 

00510 

00523 

M< : j8 

735-12 

00559 

00580 NEII2 

00570 

2JiL2 

00590 

00506 

00810 

30626 NIX 13 

00636 

00640 

00850 

06666 

00670 

00680 NEXT4 

00696 

00700 

36.' 12 

00720 

00730 

00740 NEXT5 

O07S6 

00760 

00770 

22 7S2 

00790 

00800 NEXT6 

00810 

00820 

00830 

06346 

00850 

20360 NEXT? 

00370 



Listing 2: ibmduhp 



00100 


IK 


13006 


00110 PRINT 


E3L1 


1A0O2 


00120 START 


LOA 


i-z 


00130 


;-.'.. 


SGI 


00140 


1 ::.■■ 


n 


00150 


STA 


196 


00160 


LEAS 


V'ABI f . KR 


00170 


L3L 


16A 


ooi ao 


LDA 


#21 


00190 


STA 


DOVn.PCR 


00200 


LDA 


#27 


00210 


JSR 


f PRINT] 


00220 


LOA 


(66 


00230 


JSH 


[PRINT] 


00240 


L3A 


#8 


00250 


J SB 


[RRIT ] 


60760 


i;ia 


#27 



address of printer routine in ROM 

select the printer as the current device 

device-select location 

baud value for 9600 baud 

poke address for printer baud (ISO decimal) 

get address of table for AND values 

point to the start of PMDDE graphics pages 

number of graphics print rows (24 x 6 - 192) 

store number of rows in Variable DOWN 

[BH7Epson control code to 

set the forward linefeed 

to 8772 Inch (eight vertical dots) 

IBM code necessary to enable 



22S5E 

32922 

B09L0 

00920 KCXTS 

00936 

72912 

2395E 

06966 

00970 

00980 PRNT 

00996 

oione 
01013 

/is;: 

01036 
01040 
01056 

066 

170 

080 



JSR 
IDA 
JSR 
LM 

JSP 

. :>; 
JSR 

.31 

JSR 

LOS 
J'.R 
LD* 
STA 
LDA 
JSR 
LUA 
JSR 
LM 
JSR 
. 0.S 
JSR 
..Dl: 
:IR 
LM 

oita 

he; 
ut. 

ADDA 
STA 
IDA 
BItA 
BED 
hi 
ADM 
ST* 
LM 
SITA 
KLL- 

.0; 

Ajl:i 

STA 

IDA 

;. I " •'■ 

BiE 

,j: 

or'. 

STA 

L3.\ 

HIM 

BEO 

i :n 

ADDA 

57; 
lj; 

BITA 
ELE 

:.:>: 

ADDA 

STA 

! M 

BITA 

BEO 

LDA 

or; 

51 A 
.01 

B i r '. 

BE 

. [)( 

ADDA 

SIS 

LDA 

COMA 

JSR 

DECB 

LBHE 

LEAU 

EEC 

LBHE 

. m 

JSR 

LEAU 



[PRINT] 
#60 

IRRi'r i 

#27 
[PRINT] 

#100 

[PRDIT] 

#120 

[PR1N1 I 

#0 

[°(i]H" 1 

#32 

TOw.HS 

#27 

[I'Rll I 

#75 

[PRINT] 

#0 

I PRI M" I 

#1 

[PRIN I 

#8 

VALUE. PCR 

0.U 

B.X 

NEXT2 

VALUE. PCR 

#128 

VALUE. PCR 

32, U 

B.X 

NEXT3 

VALUE. PCR 

#64 

VALUE. PCR 

64, U 

B.X 

HEXT4 

VALUE. PCR 

#32 

VALUE. PCR 

96. U 

B.X 

HEXT5 

VALUE. PCR 

#16 

VALUE. PCR 

128. U 

8.x 

HEXT6 

VAUJ1 .PER 

#3 

VALUE. PER 

160. U 

B.X 

HEXT7 

VALUE. PCR 

#4 

VALUE. PER 

192. U 

B.X 

NEXT8 

VALUE. fCR 

#2 

VALUE. PCR 

224. U 

B.X 

PRNT 

VALUE. PCR 

#1 

VALUE. PCR 

VALUE. PCR 

[PRINT] 

LOO PI 
l.U 
RON. PCR 

LOOP? 
#13 

[PRINT] 
224. U 



the new linefeed setting 
IBHyEpson control code to 
mowe the printer head 
to the right 
one inch 

set the number of bytes per line to 32 

store bytes-per-Hne value in Variable RON 
IBhVEpson control code to 

set the graphics print 

mode to accept 

256 horizontal dot colunns 

load B with no. of colunns (bits) p&r byte 

clear VALUE (the graphics value to be printed} 

get the first vertical bit in the column 

AND the first bit with B.X to see if it Is set 

if first bit is not lit. goto Label HEXT2 

If lit, load VALUE Into A register 

set high bit (top printer pin] in VALUE 

store new print value in Variable value 

get the second vertical bit in the colunn 

see if it is lit 

act accordingly 



get the third vertical bit 
see if it is lit 
act accordingly 



get the fourth vertical bit in the colu 
see if it is lit 

act accordingly 



get the fifth vertical bit in the column 
see if it is IK 
act accordingly 



get the sixth vertical bit in the colu 
see if it is lit 

act accordingly 



get the seventh vertical bit 1n the col urn 
see if it is lit 

act accordingly 



get the eighth bit (bottom pin) 1n the column 
see if it is lit 

act accordingly 



load curren 
reverse all 
send the gr 
decrement 8 

i J not "ire 
if done wi t 
reduce numb 
if not done 

row done; 
send <CR> 
skip down e 



t print value in 
bits to invert 
aphics print va) 
to move to next 
with 3 columns, 
h 8 columns, poi 
er of remaining 
with row (32 by 
repare to send a 
a advance prime 
ight dot rows on 



to A register 

Image 

ue to the printer 

vertical column 

go back to LOOP! 
nt to next byte 
bytes per row by 1 
tes), goto L00P2 

carriage return 
to next 1 ine 

the PNODE screen 
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ii: 



01030 
an en 

HIM 
M1M 

H1IJ0 
II .1. 

I" 116(1 

■1171 

fit lad 

01198 

fi.i'i: 

i'ii?e 
ai?j* rsu 

UIZ1B OWN 
0I?5S VALLE 
812B8 *7*BLE 
61278 
til 28 B 
B1290 
81380 
A1310 



OK 

d!NE 

10* 

JSU 

..£'•■• 

JSR 

LOA 

JS( 

m* 
jsh 

i a> 

CLR 

rts 

RHE 
WE 
RMD 
i IB 

rats 

[ IB 

FD0 
FC6 
END 



OOKH.FtlB 

LGLIP3 

#27 

[PBINT] 

#65 

[PRINT] 

J12 

[PRIHT] 

ill 

[PRIHT] 

tfS.0 

[PRIHT] 

m 

i 
i 

10801 

10281 

10810 

S2fi*S 

180 

START 



rGduCfl mimher 6f print rows by 1 

If not at button of Image, retBrn bo I ClOPH 

Inane cone; ierd IBH/Lcsur 

control code to resei linefeed 

to I?.''? (or I/S) "nth ■ th» (i«fjult 

stnd 1BM/Ep£nn control code to 

enaolc the vpm linefeed setting 

rpiet device ieleet to the screen 

return to BASIC 

holds the number of bytes per row 

holds the lumber of B-dot rows to print. (24) 

holds the vert, griodits value to be printed 

value table for cneeMng if bits ere set 



Listinfi3: TMtDUNPB 

1 'ML PHODE SCREEN DUMP FOR 

I 'TANDY PRINTERS 

3 'BY CRAY AUGSBURG. BASED ON 

4 'HORK BY MILL [AM P. HEE 

5 'COPYRIGHT (C) 199? 

6 'BY FALSOrr, INC. 

7 'RAINBOW MAGAZINE 

IB FOR1-&H3BBB TO SH3BF1 iSf /iDAt : 

POKE].«AL(-SH"+/lS):WEXTI 

JB CLS : PRI N-T : PR1MT"I«SERT DISK A 

NO PRESS <ENTER>" 

3B M-INKEVS:lr AfOCH1ttll31 THE 

>, :;;■ 

IB SAVEH"TANOUHP.BTK".&H3000.11H3 
■F1JUQM0 

50 CLSiEND 

IBB DATA 86.rt.97.6F.B6,M.9/.96 

,8G.i2,AD,9F.A0,fl2.38.8D,BB.D7.D 

E.BA.a6.1B.A7.aD.B0.CD,B6,lB,AD 
91,A0.B?.86.18,AD.9F,A0,B2.a6 
.AH. HI .AB.B?.86,3?.AD.9F.AB.B2 
110 DATA 8e.Z0,A7.BD,B0,ftE.C6.08 
.6F,8D.00.An,A6.40.A5.85.27.04.6 
C.BO.00.A0,A6,C8.?0.A5.aB.?7.Bfi. 
A6,8D,00.95.BB,0?,A7.BD.80.8F.A6 
.CB.40,A5.85.27.BA,A6,8D,BB,84 



120 DATA B8.04.A7.eD.B0.7E.A6.C8 

.fi0.A5.85.27.0A.A6.aD.00.73,BB.[) 

8.A7.BD,BB.6O,A6,C9.a0.e0.A5.B5, 

27.0A.A6.8D.00.61.BB.I0.A7.8D.B0 

.&B.A6.C9.BB.AB,AS,ab,27.0A.A6 

130 DATA BD.00.'lF,Ba.20.A7.8D.fl0 

.49.A6.C9,B0,CB.Ab,8lj.,2/.0A.A6.a 

II. 00, 3D. 86,40. A/. All. 00. 37. A6. BO, 

BB,33.43,8A,8B.AD,9r.A0.0?.bA.I0 

, 26, FF. 79, 33. 41. 6A, 80, 00. IF. 10 

110 DATA 26.FF.6D.86.0D.AD.9F.A0 

.fl2.33,C9,B0,CB.6A,8D.0B.BE.18.2 

6.FF.3D.86.1E.A[),9F,A8,02,0F.6F. 

39, 00. BB. 00,00. 01, 02. B4. 08, 10. 2B 

.40.80 



00 Listing 4: 1BHDUMRB 



1 'ML PHODE SCREEN DUMP FOR 

2 'IBM/EPSON PRINTERS 

3 'BY CRAY AUGSBURG. BASED ON 

4 'WORK BY WILLIAM P. NEE 

5 'COPYRIGHT IC) 1992 



fi 'BV FALSOFT. INC. 

1 -RAmaOH MAGAZINE 

10 FDRI-&H3080 TO SH314F:REA0Ai: 

PaKH.VAH"iH"+AtliNE)TI 

20 CLS:PRlNI:PRlNl"lNStRf UISC A 

ND PUSS <CNTE«>" 

3B AS-It«EYt:lF AtOCIIR.!13) THE 

N 30 

4B SAVFH"IBMDUHP.BIN".SH3000.&H3 

14F.&H30B0 

SB CLSsEND 

100 DAIA B6,FE,97,6F.86,01.97.96 

.30.8D,01,3B,DE,BA,86.]8.A/.8I).B 

1.3l,B6.1B.AD,9F.AB.0?.fi6.41 ,AD, 

9F.AB.02.86.08.AD.9F.A0.B2.86.1B 

.AO.9F.AB.B2.86.32.AD.9F.A0.02 

110 DATA 86.1B.AD.9F.A0,02.ae.64 

.AD.9F.A0.B2.B6.78.AD,9F,AB,02,8 

6.00,AD,9F.A0.02.B6,20,A7.BD.00. 

F4.B6.1B.AD.9F.A0,02,86,4B.AD.9F 

,A8,02.86.B0.A0.9F.A0.02.86.01 

120 DATA AD.9F.A0.02.C6,08.6F,BD 

,00.D8.A6.40,A5.85.27,0A,A6,8D,0 

0, CE, SB. 80, A7.8D. 00. C8.A6.CS. 20. 

AS,B5.37,0A.A6,8D.00,BD,BB,10,A7 

,81).0B.87.A6.C8.40,A5.8S.27.8ft 

13B BATA A6.Bil.00.ACB8.2fl.A7.8D 

.BB.A6,A6.C8.6B.A5.B5.27.BA.A6.8 

O.00.9B.8B.10.A7,BD.00,95.A6.C9, 

00,B0.A5.B5.27.flA.A6.8D,BB,89.8B 

.08,A7,aO.00.83.A6.C9.00.A0.AS 

140 DATA B5.27,0A,A6,SD,B0,J7,88 

,94,A7,8t),B0.7l,A6,C9,00,C0.A5,8 

5.27.0A.A6.aD.B0,65,SB.02.A7.8D, 

0B.SF.AS.C9.00.E0.A5.B5.27.0A.A6 

.80,00.53.83,01 .A7.BG. 08. 4D.A6 

150 DATA BD.00,49.43.AD,9F,A0.B? 

.5A,Ifl.26.FF.e3.33.41.6A.8D.00.3 

7.10.26 i FF.57.86,BD,AD,9F.AB,02. 

33,C9.BB.E0,6A,aO.B0.26.10,26,FF 

.0F.BB.1B.AD,9F.AB,02.86.41.AD 

160 DAIA 9F,A0.0?,a6.BC,AO,9f ,A0 

,0?,86,1B.AD.9F,A0,02.B6.32.AD.9 

F. A0. 02, 0F.6f ,39,00.00,00.00.0] , 

02, 04. BS. 10. 20. 40.80 
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About Your 
Subscription 

Your copy of the rainbow is 
KM second fins', mail. You must 
notify us i)i' u new address when 
you movo, Nolificaiiotl shim Id 
reach us no later than the 1 5th of 
the month prior to the month in 
which you cSiange your address, 
Surry . wc t'aimot be responsible 
for sending another copy when 
you fail to notify us. 

Your mailing lahel also shows 
an account number and the sub- 
scription expiration date. Please 
indicate this account number 
when renewing or corresponding 
with us. It will help us help you 
better and faster. 

For Canadian and other non- 
U.S- subscribers, there may be a 
mailing address shown that is dif- 
ferent from our editorial office 
address. Send your corre- 
spondence to our edt- 
li.niitl offices at Fill- 
soft, inc.. The Falsoft 
Building. P.O. 
Box 385,j! 
Prospect . 
KY4fX)5<l ., 





sIe@1I!^ Plug V Go for Your CoCo! 







iL^hir NX-1 020 



This CoCo compahble NJMQ2Q system sets new standards in color 
printer performance... 225 cps, 4 NLD fonts including Scnpl. plus a 
higfi speed draft font: hut ihe Bnharnuements dun I stop ihere, Adda 
1 Gk buff e r, i special quiei i node, Lop f e&o, bottom and rear tracED r . aod 
the list goes cm Seven on-dernanrj colors, S Color graphic modes, 
Epson and IBM emulatfon for maximum software compatibility 
Virtually everyltiing desired m a printer is here — speed, color and 
versatility al an affordable P r!ce Wltn a ? V^ ar -varranty. 

Our Plug'n'Go for the Coco system includes: 

• fiX 1020 Mutti Font Color Printer 

* Blue Streak Ultima 

• Software Support Disk 

* Color Graphics Utilities 



s 239 
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■ E10 Sapping & Insurance 



„*■'. 




mmr imx-i 001 



Ttiis CoCocompaiibie NX- 1 001 system is (uily featured with 4 MLQ 
plus a draft tutu. 1 character sizes from subscript to quadruple size, 
4k buffer, 180 cos. friction and tractor feed, and mucft much more. 
Backed by a 2 Year warranty. Epson and IBM emulation modes lor 
maximum software compatibility. A performer so versatile you may 
never exhaust its creative possibilities I 

Our Piug'n'Go for the Coco system includes: 
- HX-1001 Mufti Font Printer 

• Blue Streak Ultima 

• Software Support Bisk 



s 188' 
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The Ultimate Serial to 
Parallel Interface! 

The Blue Streak Ultima 

7 Switchabie Baud Rates - 300 thru 192001 



STAR 24 WIRE PRINTER SYSTEMS ALSO AVAILABLE! 
CoCo compatible * Color and Monochrome * Call tor pricing 



An interlace cahie thai convate ibt> serial output ol a CoCo i . 2 or 3 

to a standard paral lei format, compatible with modem parallel pnnlers. 

Connecting the UHima is as easy as plugging in the cable! The lour pin 

din piucfs into ihe serial I/O port ofyourCoCo and ffie oilier enu*. a 36 

pin connector, connects to Ihe parallel port 

ol the printer. 

The Ultima is powered with me +sv supplied 

by most printers on pin 18. If your printer 

does not have +5V on pin 18 you'll need to 

add the power option when ordering. 
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S2 Siicpirtg 

POWERED VERSION 
ADO S6 .00 



Order Your System Today.., Call (513) 885-5999 



DAYTON ASSOCIATES °T, INC. 

9f)44 Quailwood Trail • Spring Valley, Ohio 45370 

[01110 n ■ muhvid Iradt tra'a Ui 5>*d lp*Jft at mil i*0»-WM UiSi •ft** it 



, VJi<l A MJMCrCJfd AttffMCd. 

Ohio resident* add b. 5% Hln tax COD add $4 .00 

&>HK*>flt*lP?HTaC*uai *R <#.Ui:*Kl FPOirtpe** TnpllclWDiFa.ricOH»>m 
J Pne 



All Dayton Associate's products have 

a 30 day moneyhack guarantee . 



16 May 1992 



THE RAINBOW 



HP DeskjBt continued from Page 1 

Some time ago, t saw the Hewlett-Pack 
aid DeskJet printers in a computer shop. 
These inkjet printers feature both a serial 
(RS-232) and a parallel interlace. More 
important, they produce fantastic laser- 
quality print and graphics - — without using 



Shielded Cable 



ware.) I have used a Macintosh, and its 
software is j ust great. B ut a $ 1 t 0O0 Mac in - 
tosh system is just about as versatile as Ihe 
Color Computer 
and does not have 

as much total fam- COCO PlUQ 

ily appeal for us. ■ 

Since money can- 



serial-to-parallel converter, you shouldn't 
have any problems connecting ibe CoCo lo 
the DeskJet's parallel port.) Since I couldn't 



Shield 





DB-25 Connector 
(Cat. No. 26-269) 



a laser When 1 asked, I was told " these are 
for 'compatible" computers, not your or- 
phan." A call to Hewlett-Packard produced 
no more information. I wrote in Color* are 
to see if drivers for CdCa Max III or Max- 
10 were available for the DeskJet, but I 
received a nice reply that they were not 
developing any more dri vers lor their CoCo 
software r 

In my quest, 1 discovered in an appendix 
from the DeskJet manuals a buried refer- 
ence to a Hewlett-Packard 227U7F Epson 
FX-BO Printer Emulation Cartridge fur the 
DeskJet. 1 knew this was the solution. 
However , the salesman had never heard of 
it and did not know how to order one. 

I went back home and considered mort- 
gaging the house to buy a new "cumpaE- 
ible' T system (for several thousand dollars, 
and the pain of having to learn new sofi- 



Figure J: Serial Printer Cable 

not be considered "of no consequence." the 
option of spending that kind of money just 
to be able lo do what I could already du 
seemed ridiculous. 

Just before Christmas, a computer-store 
chain lowered its price on the HP DeskJet 
500 from about S700 to under S500. When 
1 checked it out, I got lucky — 1 found a 
salesman who had heard of the Epson-emu- 
lation cartridge. And though it wasn't in 
stock » he kne w how to order 1 1 . 1 decided to 
lake a gamble, and after a deep breath, 
bought the printer at the sale price and 
ordered the cartridge. [Editor s Note; What 
a Christmas present] 

Putting It Together 

The first challenge I encountered in 
connecting the DeskJet to the CoCo was to 
construct an interface cable. (If you have a 



find aprc-madc cable to connect 
between the 4-pin serial port on 
the CoCo to the DeskJet's 25- 
pin RS-232C connector, 1 pur- 
chased a shielded DB-25 male 
to DB-9 female cable (Cat, No, 
26-269) and a CoCo serial cable 
f 4-pin DIN on each end; Cat 
No. 26-3020) from Radio Shack. 
I first eul one of the connectors 
off the CoCo seri al cable and the 
9 -pin connector from the 
shielded cable. Then I connected 
ihe freed 4-pin DFN 



page, throwing off page placement. 

While ihe HP DeskJet comes with a 
comprehensive software guide, do not ex- 
pect to find any information about CoCo 
software. However, once the Epson emula- 
tion cartridge is plugged in, the CoCo thinks 
it's driving an Epson FX-80 — ir was easy 
to reconfigure, my CoCo software to drive 
my new * * Epson . * * At the same time , it i s re- 
assuring that if you want to use the DeskJet 
with a PC compatible, you can simply 
remove the cartridge. 

The Knd Result 

In short, we have been very pleased with 
our HP DeskJet 500 printer and the CoCo. 
Printed output is near laser-printer quality . 
The printer is fairly quiet, and it now takes 
only about 45 seconds to print a Max- 10 
page instead of the seven minutes it takes 
with the DMP-105. Using WordPowerSJ 
(or any major word processor), support for 
all the normal, bold, italic, underlined, con- 
densed, expanded, subscript and superscript 
fonts and styles is available. And though a 
proportional I'cinl is. a I so availably I l"i "-" soli- 
ware 1 use docs not have the ability' to use it. 

t have found th at w hen com bin ing sly les 
(c,g. T italic and bold, italic and underline, 
bold and underline), only one of the fea- 
tures stops when you tell it to. But for me, 
it is a small penalty to not use those com- 
bined features. 

Finally, the DeskJet 500 prints on plain 
paper and business-size envelopes. It can 
also print in either the portrait (normal- 
upright) or landscape (turned sideways) 
modes. 

The DeskJet has given our CoCo a new 
lease on life 1 as we can now print text and 
graphics of a quality and speed matching 



Bank A 



CoCo 4-pin DIN 



DeskJet 500 OB-25 



Pin I : CD (Carrier Detect) Pin 4: RTS (Ready to Send I 

This siciul is sent from Ihe printer lo the CoCo. telling Ihe CoCo lhat 
the pnmer is on. It is the purple wire on Ihe 26-269 cable. 

Pin 2: RD (Receive Data) Pin 20: DTR (Data Terminal Ready) 

This signal from Ihe printer tells Ihe CoCa Ihsl ditta transmission can 
be BCcepted. Il is the yellow wrrc on the 2G-269 cable. 

Pin 3: CND (Zero Voltage Ref) Pin 7: GND (Signal ground) 

This serves as Ihe reference point tor data transmission. II is the 
<:i sen wire i hi the 26-269 cable. 

Pin 4: TD (Transmit Data) Pin 1: RD (Receive Data) 

This is the line over which data is sent from the CoCo to 
the pnntcr. It is the red wne on Ihe 26-2651 cable 

Note; The metal bond urotind the 4-pin DIN connector 
should be connected to the cable shield. 



Figure 2: 4-pin l)l,Vl)B-25 Serial Cable Connections 



1 1 3 4 5 6 7 I 

1-4 (DOWN) DEFAULT 
OrttRACTERSET 

5-6 (DOWN) 85 X 11" 
PAPS! SEE 

7 (UF"SELECTS 
CB=CR+LF 

8 (UP) DISABLES 
PERFCRATXDNSKP 



plug with the 
shielded cable with 
the DB-25 on it as 
shown in Figure I. 
The connections 
are summarized in 
Figure 2. 

Iwasiemptedtu 
buy just a male DB- 
25 and replace one 
of the plugs on the 
CoCo serial cable. 
But I decided il was 
best to use shielded 
cable, and the 
CoCo cable is not 
shielded. The dif- 
ference in price was 
only a few dollars. 
Still, you could buy 
the shielded serial 
cable and a sepa- 
rate 4-pin DIN plug 
(Cat No. 274-007). 

Up and Running 

The second 
challenge was set- 
ting the DIP switches on the DeskJet 500. 
Using a combination of RTM (read-the- 
manual) and trial -and -error techniques, I 
determined that the DIP switch settings 
should be as shown in Figure 3. 

Although the DeskJet 500 offers 1 5 dif- 
ferent built-in character sets, the PC-S set is 
most compatible wilh Color Computer 
ASCII. I set switches A 1 through A4 (Bank 
A) lo select this font. Those with special ap- 
plications can convert as required to one of 
the olhers. Since the CoCo does not auto- 
matical 1 y send a 1 i nefecd w i th each carriage 
return. Switch A7 must be "up" so the 
printer adds the linefeed itself. I also learned 
thai Switch AH must be "up" to disable the 
perforation skip; otherwise the printer ad- 
vances an eisira half inch at the top of each 



BankB 



iHg liiggj 



1 l 3 i 5 E 7 t 

1 <downinormal 
tect9cale 

2 (down) normal 
graphcsdenstty 

3 (down) disables 
termkalmode 

4-5 (down) 9600 baud 

6-8 (DOWN) RS-232 



■ 



Figure .1: Suggested DIP Switch Settings 







the "big boys. ' ' The CoCo and the DeskJet 
are a great match for each other — in price, 
in capability and even in the color of the 
case. Who could ask For anything more? 



Bill Palmer is a reactor safety engineer 
for Ontario Hydro at the Bruce Nuclear 
Power Development. He uses a CoCo 3 at 
home and has been a user of Radio Shack 
computers since he bought a Model I in 
1979. His setup now includes the Model 1 . 
each of ihe three CoCos and a Model 100. 
BUI and his wife. Jean, have two sons and 
live on a small farm on which they are 
developing a \t ildiife sanctuary and a gath - 
erhtg facility for youth and church groups. 
You can contact Bill at TRl-LEA-F.M, RR If 
5. Paisley. ON NOG 2 NO. Canada. /Hi 
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Feature Prosram 



for Lorn Buffs 



^F wap Around is a CoCo 3 game thai 
_» tests your logical thinking skills and 
J^F your abi lily to plan ahead . When yo u 
run the program. two 3-by-3 grids appear 
onscreen. The upper grid contains a red 
pi aying piece in each square . and the lo wer- 
rsghi square is also the upper-left square of 
the bottom grid. The eight pieces on the 
bottom grid arc hlue. The common square 
does not contain a piece. 

The object of Swap Around is to move 
all the red pieces to the bottom grid and all 
the blue ones to (he top. Your score in- 
creases by one with each move; the lower 
the score, the better you did. To quit or start 
a new game, press Q at any time. After you 
run die program, press Y at the First prompt 
for complete instructions on moving the 
playing pieces. 



The Listing: SWAP 

1 'SWAP AROUND 

2 'BY GEORGE k ELLEN AFTAMONOW 

3 'COPYRIGHT (C) 1992 

4 'BY FALSOFT. INC. 

5 'RAINBOW MAGAZiNE 
10 P0KE383.158 

20 OIHA[17):OATA108.32.14B.3Z.IB 
8.32.188.64,148.64,188,64,108,96 
.148. 96,188,96.228. 96.258.96,188 
.128,228,128.268.128.188.168.228 
.160.268.160 

30 PALETTEB.0:PALETTE5.63:HSCREE 
N2:HCL50:HCQLOR5.B 
40 HPR[NTUB.10>."<C>MP OR <R>GB 
7" 

50 I*-INKEYf:IFlS-" THENSB 
60 IFII-"C"THEN70ELSEIFK-"R"THE 
N8BELSE50 

70 MR-1:PALETTECMP:PALETTE0.0:PA 
LETTE1.17:PALETTE2.S:F'ALETTE3.60 
:PALETTE4,53: PALETTES. 63 :GOTO90 
8B HR-2:PALETTERGB:PALETTEB.0:PA 
IETT£1,16:PALETT£2,39:PALETTE3,2 
7 :PALETTE4, 50: PALETTES, 63: '0-BLA 
CK:1-GREEN:2-«ED:3-BUJE:4-YELL0W 
:5-WHITE 
90 HCLSB 

100 HORAITBM110.40C2SBLBH2U2R2FR 
SEU2HL5H3USE2R8F2D2L2HL5GD2FR6F2 
D6G2BR19 L2H2G2L2H3UL4R3D13FRELI7 
R2D7FREU13R3D14G3BR21 L3U7L6D7L3 
U13E4R4BG3G202R6U2H2L28E3F4013BR 
9 L3U17R8F2BG3DGL2HU2ER2FDBE3D6G 
2L507" 

110 HPAINT£108,36),2,2:HPAINT<13 
6.38).2.2:HPAINT(168.38).2.2:HPA 
INT<2B4.38),2,2 

120 HDRAM-BH75.UBC3L3U7L6D7L3U1 
3E4R4BG3G202R6U2H2L28E3F4013BR19 
L3H6D6L3UI7RBF2BG3DGLZHU2ER2FDB 
E3D6G2LF5D2BR17 L8HZUT3E2R8F2D13 
BH3U8HL4G09FR4EU8F3G2BR18 L8H2U1 
5R3D13FR4EU13R3015G2BR22 L3B3U2H 
3U2H2D12L3U17R3F3D2F3D2F2U12R3D1 
7" 

13B HDRAW"BM240.110U3RU11BR3R4FD 
9GL4UUBL3LU3R10F2D13G2L10" 
140 HPAINT(73.10B),3,3:HPAINT(10 
B.108>.3.3:NPAIffT(138,108),3,3;H 
PAINT(16B,108).3,3:HPAINTC201,10 
B).3.3:HPAINT(242.108),3.3 
150 HC0L0R5:HPRINTU9,17)."by":H 
PRINT(9. 20), "GEORGE & ELLEN AFTA 
MONOW" 
160 GOTO] 80 
1/0 KnRVn-301OlSTEP'4:PLAY"V-KO: 



Swap Around is written in BASIC and is 
designed for the CoCo 3. After you exit the 
game, make sure to fully reset the CoCo 
(use CTRL-ALT-Resel or turn it off) be- 
fore loading another program. 

.Achieving a perfect score (46) with Swap 
Around is fairly difficult. Good luck. 1 



George and Ellen Afiamonow , a pair of 
self-taught programmers, believe computer 
users need an&ther number cruncher as 
hadly as a pi % needsawallet. So they- like to 
sit down and enjoy the challenge of writing 
entertainment software. They can be con- 
tacted at 46 Hone Street. Milford. (7106460. 
(20.U 87&-3602. Please include an SASH 
when requesting a reply. 



":FORZD-5I01STEP-3:FORZN-9TC1STE 

P-1:PLAY-T255L2S50-Z0;-ZN;":NEXT 

ZN.ZO.V0:PLAY"Y15": RETURN 

180 IFMR-1THENPALETTEZ.60:PALETT 

E3.B:GOSUB170:PALETTE2, 8: PALETTE 

3.60:GOSUB170:GGTO200 

190 IFMR-2THENPALETTE2,27:PALETT 

E3.39:GOSl)B170:PALETTE2.39:PALET 

TE3.27:GOSUBL70:GCTQ200 

20B KCLS5:HC0L0R1:HF-RlNTt6.2),"D 

YOU NEED INSTRUCTIONS?" 

210 H-INKEYi:lFlJ-""THEN210ELSE 

IFI»-"H"TttEN230 

220 TFtl-"Y"THENGO5UB750EL5E210 

230 HSCREEH?!HCISS:HC0I.0M,5 

240 HLIHE(10.2>-<318,190>.PSET.B 

:HLIN£(64.6)-(314.186).PSET.B:HL 

INEU4,6)-C60.186),PSET.B 

250 HDRAW" BM88, 16516R10ND24R10ND 

24RI0DBNL30D8NL30ND24R10ND24R10D 

8NL30D8NL30U8L30U16L20U24" 

260 H0RAw"BM46,44S8L8HZU2R2FRSEU 

2HLSH3U5E2R8F202L2HLSGD2FR6F2D6G 

2BR2BD18 G3L2H2G2L2H3U14R3013FRE 

U7R207FREU13R3014G3BR3B021 L3U7L 

6D7L3U13E4R4BG3G2D2R6U2N2L2BE3F4 

013BD14 G2L5D7L3U17R8F2D6BH30GL2 

HU2ER2FB" 

278 HPAI«T(44,42).1.0:HPAINT<46, 

74).3.0:HPAINT<47.I10).4.0:HPAIN 

T(48.1S0).2,B 

280 KCIRCLE(10B.32).10.2.1;HC1RC 

LE(14B.32).10.2.1:HCIRCLE<1B8.32 

). 10. 2. 1:HC1RCLE(1B8, 64 1,10,2,1; 

HClRCLE{148,64).10.2.1:H:iRCLE[l 

8B.64).10.2,1:HCIRCLE(10B.96),10 

.2,1:HCIRCLEU48,96),10,2,1 

290 KC1RCLE(228.96).10.3.1:NCIRC 

LE(268.96).10.3.1:HCIRCL£(268.12 

81.10.3.1:HCIRCLE[228.12B).10.3. 

1:H:IRCLE(188,I2B).10.3.1:HCIRGL 

E(188,160).10.3.1:KC!ROLE(228,16 

0].10.3.1:HCIRCLE(26B.160).10.3. 

1 

300 HPA1NT<108.32),2.2:KPAINTU4 

B.32).2,2:HPAINT(188,32),2,2:Ht>A 

INT(108,64).2,2;HPAINI(148,64),2 

,2:HPAINT[1BB,64).2,2:HPAINT<18B 

.96),2.2:HPAINT<148.96>.2„2 

310 HPAINT(228.961.3.3:HPAINT{26 

e.96).3,3:HPAlNT(268,128L3,3:HP 

A1NT[22B.128).3.3:HPAINT<188.128 

).3.3:HPAINr(iea,160).3.3:HPAINI 

(22B.16B).3.3:HPAJNT!26B.160).3. 

3 

320 HPRINT(30.2)."MQVES":HPRINT( 



11. 16). "PREVIOUS" :ttPRINT( 10. 17). 

"BEST SCORE": IF8S>0 THENHPRINT(1 

2,191.85 

330 HPAINT(12,4).4.0 

340 hCOL0R3:HUNEt76,16)-{79.36) 

,PSET,BF:HC0L0R2:HLINE<29B.1S6)- 

<3B0.176).PSET.8F:KCDLOR0 

350 F0RZ-1T0B:A{Z)-Z:NEXT:A(9)-B 

:F0RZ-1BT0I7:A(Z)-3:N£KT 

360 X-168:Y-B0:SC-0;Z-9 

370 lJ-[NKEY$:IFIt-""THENHLltlE(X 

,Y )-(X+40.Y+32>. PRESET, B:HL I NEIX 

.Y)-(X+40.Y+32),PSET.B;GOTO370 

380 IFI(-CHR$<13)AHDA<ZK>0 THEN 

4S0 

390 IFIt-CHRS(9) AN0ZO3 AN0ZO6 

ANDZOl 1 AN0ZO14 ANDZOl 7 THEN 
X-X+40:Z-Z+1:GQTO370 
400 IFIt-CHRJ(B) ANDZOl ANDZ04 

ANDZOZ ANDZOIE AN0ZO15 THENX 
-X-40:Z-Z-1:GOTO370 
41B IFU-CHRJ<94) ANDZOl ANOZO 
2 AN0ZO3 ANDZO10 ANDZOll THEN 
Y-Y-32:Z~2-3:GOTO370 
420 IF1*-CHR*<10) ANDZOT ANDZO 
8 ANDZ015 AN0ZO16 AN0ZO17 THE 
NY-Y+32:Z-Z+3:GOTO370 
430 IFIJ-'O" THEN700 
440 G0T0378 

450 FORE-lTO17:IFA(E)-0 THEN460E 
LSENEXT 

460 ON 1 GOTO470. 480. 490. 500.510 
.520,530.540.550.560,570,580.590 
,600,610.520.630 

470 1FE-2 ORE-3 ORE-4 ORE-7 THEN 
640ELSE740 

4B0 IFE-1 ORE-3 ORE-5 DRE-8 THEN 
640ELSE740 

490 IFE-2 ORE-1 ORE-6 QRE-9 THEN 
640ELSE740 

500 IFE-1 ORE-5 ORE-6 DRE-7 THEN 
640ELSE740 

510 IFE-2 ORE-4 ORE-6 ORE-8 THEN 
640ELSE740 

520 IFE-3 ORE-4 ORE-5 ORE-9 ORE- 
12 THEN640ELSE740 
530 IFE-1 ORE-4 ORE-8 ORE-9 THEN 
640FLSE740 

540 IFE-2 ORE-5 ORE-7 ORE-9 ORE- 
IB THEN64BELSE74B 
550 IFE-3 ORE-6 ORE-7 ORE-8 QRE- 
10 ORE-11 ORE-12 ORE-15 THEN640E 
LSE740 

560 IFE-8 ORE-9 ORE-11 ORE-13 OR 
E-16 THEN640EL5E740 
570 IFE-9 ORE-10 ORE-14 0RE-I7 T 



660 IFA(9)O0 THEN370ELSEFORO-1T 

08:1FA(QX>3 THEN370ELSENEXT 

670 IFSC-46 THENHCGL0R1:HPRINT(2 

9.6),"PERFECT":FORO-1T05:PLAY"T2 

50£AGAEAGAEAGA"rPALETT£5.Q:HEXT: 

PALETTE5.63 

680 HLINEl90.150)-tl40.170),PRES 

ET.BF:IFB5-0 THEN8S-SC ELSEIF8S> 

SC THENBS— SC 

690 FORQO-1TO4:PLAY"T25BL200OLGE 

A02GEA03GEA04GEA05GEA" i NEXTQQ 

700 HCOLOR1:HPRINT(12,20),BS:HPR 

INT(27.6),"PLAY AGAIN?" 

710 I$-INKEY$:IFI$-"" THEN710 

720 IFIt-"Y" THEN230 

730 IFH--N" THEN850ELSE710 

740 HC0L0R];HPRINT(29.6)."ILLEGA 

L" : PLAY "T200BAD8AD" : F0RQ-] T05BB : 

NEXT:HCOL0R5:HPRlNr(29,6),"ILLEG 

AL":HCOLOR0:GOTG370 

750 HCLSB : H PRINT (1. I). "The objec 

t Is to interchange all nf Lhe": 

HPRINT(1.2)."RED markers with th 

e BLUE markers." 

?60 HPRINTt 1.3), "Markers are e1t 

her slid onto a vacant";HPRINT(l 

.4), "square or Jumped over any o 

ther stng1e":HPRINT(l.S), "marker 

. All moves are eltner horlzonta 

l":HPRINT(l.S)."or vertical," 

770 HPR1NT(3,8)."M1th the arrow 

keys, position the":HPRINT(1.9J." 

bl Inking square on the marker th 

at you" :HPRINT( 1,10), "wish to mo 

ve. Then press ENTER." 

780 HPR1NTI8. 24), "Press ENTER to 

continue" 
790 IFtNKEY$-""THEN79B 
80B HCLS5:HPRINT( 12.1 ), "SCORING: 
":HPRINT(2.3),"1 Point IS scored 

for every move":HPR1NT(2.4),"Re 
member, you want a LOW score." 
BIB HPR1NT<3.5),"46 ts perfect." 
:HPRINT(l,9)."Press !0) at any t 
ime to quit or start":HPRINT(2,l 
0)."over." 
82B HPRINT(B. 24). "Press ENTER to 

begin." 

B3B It-INKEYV:1FIS-""THEN83B 

840 RETURN 

850 H5CREEN2:PALETTE0.0;HCL50 

86B FOR7-1TO10 

870 X-RNO(150):Y-RND(96):X2-320- 

X;Y2-191Y:U-RN0(X):H-RN0(Y) 

8B0 C-RN0163):PALETTEZ,C:HC0L0RZ 

890 HLINE(X.Y)-tX-W.Y+H).PSET.6F 
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HEN640ELSE740 

580 IFE-6 ORE-9 ORE-13 ORE-14 OR 

E-15 THEN640ELSE740 

590 IFE-10 ORE-12 ORE-14 ORE-16 

THEN640ELSE74B 

680 IFE-11 ORE-12 ORE-13 ORE-17 

THEN640ELSE740 

610 IFE-9 ORE-12 ORE-16 ORE-17 T 

HEN640ELSE740 

620 IFE-10 ORE-13 ORE-15 ORE-17 

THEN640ELSE74B 

630 IFE-11 ORE-14 ORE-15 GRE-16 

THEN640ELSE74B 

640 C-A(Z):HPA1NTU+20.Y+16).5.5 

:A(Z )-0: F0RQ-1T0E : REAOXX , YY : NEXT 

;HCIRCLE(XX.»Y).10.C:(1PAINT(XX.Y 

Y).C.C:A<r.)-C: RESTORE :SC-5C+ltHC 

0L0R5:HLINF( 244.32) (276.40).PSE 

T,BF:BCOLOR1:HPR1NT(30,4).SC:HCO 

LOR0 

650 IF5C<46 THEN370 



900 HL1NE(X2.Y)-{X2+W.Y+H).PSET. 

BF 

910 HLINE(X.Y2)-(X-M.YZ-H),PSET, 

BF 

920 HLtN£<X2.Y2)-CX2+w.Y2-H).PSE 

T.BF 

930 NEXTZ 

940 FORX-1TO600:NEXIX 

950 HC0L0R1 

960 HCIRCLE(!63,96),35 

970 ■HPRINT(19,11),"THE":HPRINT( 

19, 12). "END" 

980 C-RNO(63):PALETTE10.C 

990 HPAINT[150.96).10.1 

1000 HCOlOR0:HPRlNr<18.1B)."T H 

E":HPRINT{18,)3),"E N D" 

10IB FORX-1TO600:NEXTX 

1020 FORP-1T05:FGRO-IT015:PALETT 

EO ,RND(63 ) : PLAY-T250D3G" : NEXTO, P 
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Product Review 

Window Master V3.0 

Gives BASIC 

a New Look 

The ability to use pull-down menus and 
pup- up windows in your programs or while 
programming is enticing. When I ihinkol'a 
windows environment, it's usually OS-9, 
However, over the years" programmers have 
been pushing Basic to new heights, Win- 
dtw Master allows users to easily incorpo- 
rate windows, menu bars and other attrac- 
tive features into their programs by adding 
some new commands to Color BASIC — 
calling the new language Window basic. 
Not only does Window Master offer new 
commands, it has many practical features, 
sudi us Finder, the poi in -and -click mnusc- 
ririven interface for file management. 

Window Master requires a CoCo 3, a 
disk drive, a Tandy Hi-Res interface, and a 
joystick or mouse. There are a few restric- 
tions and limitations when used with I28K 
machines (no RAM disk, fewer windows, 
no sup|>on for the wit) in command, and a 
limited screen resolution of 320x200 with 
four colore); however, the vast majority of 
features are available. Entering RUN H k,BA5" 
loads the 5I2K version of the program 
(Wl?a.BAS is the I2HK version) and dis- 
plays die Finder interface wilh its pull- 
down menu -bar oplions and icons for drives 
II through 4, 

By default a RAM disk is created and is 
recognized as Drive 4, The RAM disk loca- 
tion can be reconfigured to an existing 
physical drive location. If this is done, the 
physical drive is reassigned to Drive 4. 

Clicking on a drive icon opens a scrol- 
lable window that displays up [oeight icons 



at a time repre seining the programs on thai 
drive. I Clicking on an icon for a nonexist- 
ent drive docs not crash the program,) Also 

,:'-.|-i.J', ::i. ,!1V Ilk' : I , . '■ . K' : ill :k 'C ,, 1 1 1 r i." - 

die scroll arrows for viewing additional 
files, a disk label, and an exit box for clos- 
ing lite window. The file type BASIC, 
binary or dam— is shown on each file icon. 

Double clicking on a program icon 
launches the related program. You can 
execute disk-management commands via 
lite Disk menu by selecting an option and 
highlighting the specific filets) to be ma- 
nipulated. Options exist for initializing and 
labeling disks, renaming files, and copying 
or killing multiple files. 

The menu bar has five additional op- 
tions: View, switches between a high- or 
low-resolution display; Demo-programs, 
features a calendar, a graphics demo, and a 
configuration demo; Fkcys, options for up 
lo SO progranmiable function ("hot") keys 
for simple execution uf complex command 
sequences; a C icon for running BASIC or 
machine- language programs, listing AS- 
CII files, and launching any installed Desk 
Accessary Pak programs; and Finder. 

Under the Finder option is a Goto basic 
choice, if you prefer using the Window 
RAS1C command line instead of the icon- 
based interface. Users can return to Finder 
by running F'lNDER.BAS from Ihe Window 
BASIC command line. However. Window 
BASIL" is where Window Master really 
shines, 

Programming with Window BASIC 

Running the u.BAS program and using 
Window Maste r is a good demonstration of 

the type of programming possible using 
Window basic:. With a good understanding 
of BASIC the new commands provided with 
Window basic should be fairly easy for 
you to use. The manual, which contains 
over 40 pages of clear instruction, lists how 



to implement the new commands by show- 
ing camples of proper syntax. 

.Some of the new capabilities offered 
using Ihe Window basic statements in- 
clude even! trapping for ihe mouse, key- 
board, timer, dialog hov.es, serial ports. 
menus, and graphics events: event specifi- 
ers; opening, closing and hiding windows; 
creating window buttons and window icons; 
creating menus; restoring and resetting 
menus; on menu gosubs; mouse activation 
and hiding; and editing statements. Event 
trapping is instrumental in branching to 
your various subroutines and then return- 
ing command lo the location in your pro- 
gram prior I he branch- 
Version updates have changed a simple 




of input/output statements Fur instance.the 
in key function now accommodates numeric 
as well as string-type arguments. Window- 
BASIC also offers support for the serial I/O 
port nr RS-232 pack by using device num- 
ber -3 for I/O path selection, pu cellar and 
fletchar allow for reading or writing of a 
single byte of information from or to a 
specified device. 



One aspect thai makes programming so 
much easier is ihe use of the function keys. 
Huilding windows and creating window 
buttons, or most anything for thai matter, as 
simplified by assigning a key. upper- or 
lowercase, and typing the command you 
want this key lo execute when it is pressed 
in conjunction with the ALT key. Having 
SO-prograniming blocks at your disposal 
should definaiely increase your program- 
ming output. 

The window in Window Master means 
I hat you can program in more than one 
w i ndow . Yo u can open and swii c h between 
several windows v ia a cl ick of the mouse or 
joystick. Tite process of changing windows 
is handled in a fashion similar to that of 
Windows for MS- 
DOS. Clicking on an 
area inside an exist- 
ing window brings it 
to ihe foreground. 
You can also retrieve 
a window by using its 
window number. This 
is handy when mul- 
tiple window arc open 
and the window you 
need is several layers 
deep on the screen. 
Windows can be 
dragged to different 
areas on the screen. 

Cer-Comp ha s d one a 
wonderful job of ex- 
tending the capabilities of BASIC. The easy- 
to-use interface and well-documented pro- 
gram features help make the transition to 
Window Master a smooth one. (CrX-COMP 
Ltd.. 5566 Richochel Avenue. Las Vegas, 
. V 1 89110.(720)452- M.U ; S6V.95 plus $4 
S>llJ 

— Tony Olive 




fa I am inleresied in finding a pen pal. I have a CoCo 
3, a Mu] li - Pak . a 2400-bps modem and ol her assorted 
items. M_y hobbies include computers, bicyc] ine, elee- 
inmics, science fiction and writing. I'm 33 years old 
and will write to persons of all ages, 

Mirbatl Hnttn 

MSPurkAvrttltij 

tdato Fall!. ID 8J402 

fa I own a ] 28K CoCo 3 and two 80- track di sk drives. 
I would like to know how to use a Seagate SI 22530 
megabyte hard drive wjcli my CoCo. I'm planning ED 
purchase OS-o Lxvel tt when I upgrade so 5 1 2K. I am 
an assembly- lariyuaL'i: proyTummer arid know scveml 
proecssora already, and I plan lo expand my program 
mtagcmlpu! 1, 1 ine ludc die CoCo. I wou Id appreci ale 
convspondenec wilh a readinVnmgTjimmer whp is 
interested in helping me catch up on the current pro- 
)»rnmniine trends and techniques on the CoCu. 

P.O.Bax287 
Damn. VA 24612 




CoCo Clubs 



CALIFORNIA 

« SlO Vel Wesl. Alan Shehra. P.O. Rol 38713, 
Del ly wood, 90038, (iU8)7M-4lJj,BBS (811)781- 
4721 

COLORADO 

** Colorado Springs Color Computer Club. Bud Want, 
1 1 1 s Claiborne Road. Colorado Springs, 80906-35] J, 
1719)392-8268 



CONNECTICUT 

** Connecticut CoConul Connection. Charles Joseph 
Scanlon, 2 Eagle Line, Simshuiy, 06070. (203) 657- 
8373 

FLORIDA 

* The Colnr Computer 3 Users Group, Tom Batch- 
elder. 6042 Syrele Ave,. Milton, 32570, (904) 623- 
4405 

GEORGIA 
' Atlanta Computer Society. Inc., Alan R. Dages. 
4290 Bells Fcn-y Road Suitt 1(1639. Kennesaw, 30144. 
(404) 469-5 1 1 1 votes, (404) 636- 299 1 modem 

IDAHO 
" Snake River Color Computer Club, Emil Franklin. 
1750 Caimel Drive, tdatio Falls, 83403, (208) 522- 
0220 

ILLINOIS 
"O Cook County Color Computer Club, How aid 
Lackey. 10 McCarthy Rd. Part Forest. 00466-21 22, 
1708) 747-01 17 

* Motorola MicmCom pa terCUih. Sieve Adler. 1 30] 
ta-l AlcunuuMI Kd., Shaumhutg. 60196. I 70S) Sltv 
3044 

IOWA 

7* Mclro Area Color Computer Club, Joe Cavallmni, 
2425AvcA.Co.Blul'ts,5l50!,i7i:i <22 ZJ3S 

KENTUCKY 
** Hardin County Color Computer Club, Paul L'r- 
hihns, 2887 Republic Ave.. Rude I iff, 40160. (502) 
351-4757 

LOUISIANA 
" Trie CoCo SIG. Christopher Mayeui, 20 Oibbs 
Drive. Chatmenc, 70043. (504) 277 6880 voioe,t504) 
277-SI35modon 

MARYLAND 
o ArUde, John M. Beck. 3513 Terrace Drive »D. 
SuMlalicI, 20746. (301 ) 423-S418 

MASSACHUSETTS 
V NonhEast CoCo Club. Jose Joulwit. 440 North 
Ave., Bide. 9r»2 10, Haverhill, 01830, (508) 521-0164 

MICHIGAN 
7f Greater Lansing Color Computer Users Group. E. 
Date Kneppcr. P.O. Bo* 141 14, Lansing. 48901. (517) 
6266917 

MISSISSIPPI 
1* Mississippi OS-9 User Gmup. Roisy G. Piire. 
Southern Stalkifi, Bon 845), I lal ; ■■■■■ ■ (9406.8455 
1601 1 266-2807 



MISSOURI 

« CoCoNuls User Croup. Clyde LlDyd, 2110 S. 
Columbia. Springfield, 65803, (4171866-8738 
f KC CoCo. Gay Crawford, P.O. Bos 52(1084. Inde- 
pendence, 64052. (913) 764941 3 
NEBRASKA 

* Bruec Gtrsl c/0 Metro Area CoCo Club. P.O. Bo* 
3422. Omaha. 68 103 

NORTH CAROl.tNA 
■» Raleigh CoCo Club. P.O. Box 10632. Rakish. 
27605.(919)878-3865 

" The Tandy Color Computer Users of Cbariotte. 
Eric Stringer, 1022 Notes Dr. Mt Holly, 28120 
(II DO 

* The Greater Toledo Color Computer Club, Bill 
Espen. 1319 North Si.. Bow ling Green. 43402, 1 4 1 9 1 
471-9444 

f Tri-Counry Computer Users Group. Ron Power. 
10914 Oliver Road, Cleveland. 441 1 1, (2)6) 476- 
2687 

PENNSYLVANIA 
T Cumberland Valley Users Group, Thomas Martin, 
9085 Ncwburg Road, Nc-whurc. H240. (7171 423- 
5525 

RHODE ISLAND 
"New Lis eland "CuCoNul s" C \»U u ( i im |>u t. 1 r C 1 1 1 h. 
Arthur J. Mendonea, P.O. Box 28106 North Stalion. 
Providence, 0?)OB. (401) 272 -5096 (Sig3) 

SOUTH CAROLINA 
» Spananburg CoCo CItltl. Jesse W. Parris. 152 Bon 
Air Ave., Spartanburg. 29303, (803) 573-988 1 
SOUTH DAKOTA 

* Empire Area Color Computer Users Group of 
South Dakota, Carl Molr. P.O. Bo* 395, Brandon, 
57005. (6051 582-3862 

TBXAS 
« The Codis CoCo Symphony.WilliamC. Garrctson, 
2902 Harvard Si.. Irving. 75062. (214) 570-0823 

UTAH 
« Salt Ciiy CoCo Club. L. Todd Knudscn, 6357 S. 
Lolus Wav. West Jordan. H4084. (801 1 968-8668 
WASHINGTON 

* Bellingham OS-9 Users Group. Rodger Aksander , 
3404 Illinois Lane, Bcllingham, 98226, (206) 734- 
5806 

** Pon O l CoCo, Donald Zimmerman, 3046 Banner 
Rd. SE. Port Orchard, 98366-88 10. [206) 87 1 -6535 



AUSTRALIA 

f Australian Nauooal OS-9 Uflcn Group, Gordon 

benl/en. C/- 8 Odin Si reel. Sunnybank. Queensland, 

4109, (1)7) 344--38S] 

71 Brisbane Soulhwcsl Colour Computer Users Group, 

Bob Dcvric5. 21 Virgo St.. Inala, Oucenslaud. 4077. 

(07)372-7816 

CANADA 
TT Club d'Oridinateur Couleur du Quebec Inc., 8000 
Metropoltlain est, Anjou, Quebec. HIK IAI, (514) 
354J»94l 

GERMANY 
TT OS-9 Users Group in Europe, Burghard Kinzel, 
tarip/igcr Ring 23A. 5042 ERFISTADT. +49-2235- 
41069. (OS -9*809) 

THE NETHERLANDS 
■ Eunijiean OS 9 User Group. Peter Tutelacrs. 
Sln)perstraat 50A, 5595 GD Leende. 
s88405777@hsepml.hsc.nl. +3 1-4906-197 1 . ( QSK) 

PUERTO RICO 
* Puerto Rieo Color Computer Club, Luis R. Mam 
nez. PO Bos 2072. OuiyiuAo, 18)657-7004, |809l 
799-8217 or (809) 72S-S3M 




Mosl users familiar vsith Super 
Extended BASIC on the CoCo 3 already 
know the ATT R command tdn he used to 
make characters blink on the CoCo 3"s 
Hi -Res screens. Memory Location 
$FF94 controls the blink rate of charac- 
ters pri mod wilh the 8 ( li nk ) attri bu le se t . 
Just enter POKE iHFf 94 .A', where .v is any 
value between U and IS. (Actually, the 
command works with oiher values but is 
babied on ihe least significant four hits. 
Using a value of Itt has the same effect 
as using 0.) To restore ihe system to its 
default value, enter POKE &HFF94.126. 
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t Late/City 


1I11S Same 


Access Mum her 




Parameters 


SysOp 








tlma iHlIf Iffwi aici 


Stop Itils.i 






Arkansas 












Sheridan 


The Grara County BBS 


(501)942-4047 




300/1 20O/24OO-N-8-I 


Eddie Gilrnore 


CiilirEtrniu 












H^JIywoiHJ 


Zug's Cavern BBS 


(213)461-7948 




300/1 20Q/2400-N-8-1 


Alan She lira 


Cim n^tliLul 












Manchester 


Silk City BBS 


(203)649-9057 




3O0Y120O/24OO-N-8-I 


Danen Kindberg 


tt.iV::n.:y 


Applause BBS 


<203)7S4-)J98 




?O07l2OO/24l»-N-8-l 


Carmen Izzi t Jr. 


Hawaii 












h. Shafts 


CoCo'Nuts BBS Service 


(808) S4S-70S4 




300/1 20O/24UO-N-8-I 


Tomrtik Taylor 


Utahn 












Idaho Fal Is 


Snake River Computer Club BBS' 


[2BXj 52 J! 179h 




3OWI2O0-N-S-1 


Jon Could 


[llinnis 












Qopeotttwilk 


The Pinhall Haven BBS 


(70S) 428-8445 




30W12O0/240O-N-8-I 


Jeffrey R. Chapin 


Kentucky 












Elthom Ciiy 


Cross-N-Cwmi BBS 


(606) 754-9420 




300/MOO-N-S-! 


Tim Mcintosh 


Michigan 












Manistee 


Crystal Palace 


(616) 723-0146 




1200/2400-N-S-l 


Nelson Howard 


Mississippi 












Hatiiesburg 


The OS-9 Zone 1 


(601) 266-2807 




3OO/l20u724OO-N-8-l 


Boisy G, Pitre 


New York 












Wappinpers Fails 


The Dutchess CoCo 


(914)338-1261 




300/I2O0/240O-N-S-I 


Chris Serine 


N<arlh l':ir£.lin:j 












Wilmington 


BUTs Boand 


(919) 395^366 




3007 1 200/2400- N-K-l 


Bill Medcal f 


North Dakota 












m 1 1 1 1 u afb 


The 9-Line BBS 


(701)727-6826 




3WI200-N-B-I 


David ] leiix ley 


Ohio 












Culumhus 


Springwrood BBS 


(614)228-7371 




3OO/I20W240O-N-8-I 


Edward Langenback 


Pennsylvania 












Constohockcn 


Charlie's Help Line 


(215) 825-3226 




300/l200-N-fi-lornl-7-l 


Charles DiMartino 


Rhode Island 












Centra] Falls 


"lite Weather Connection 11 BBS 


(401)728-8709 




3OWI2OU7240O-N-K-I 


Eric Cltew 


Virginia 












hall Mills 


Clem's Comer BBS 1 


(703) 322-4033 




30WI200-N-B-I 


Richard Douglas Bailey 


Wtufchnfiw 












Fiiucst 


OS-9 Tacntna 


(206) 566-8857 




3O0/120W24OO-N-8-I 


Chris Johnson 


Wisconsin 












Msiinrttc 


Phoenix Interelalc Dalit Systems* 


(715) 732-1036 




3OW120W24!XV9(j(X)-N-8. 1 


foe Boburka 


Canada 












Twillingate, NF, 


ColorNET BBS 


f709) 884-2176 




.;:ni s s 1 


Jason Woodford 


Windsor, OnUrio 


Color COTlTKfLHTTt 


(519)948-1879 




300/1 200-N-fi-l 


Cory Richtir 


Notes: 'Snake River Compuier Club URS suppons all types of computers. The OS-9 Zone is up from 10 p.m. io 6 a.m. seven days 
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The c rilics willb? raving about this strategy jjame! Bawd on an origi nil concern fry au ther ferTSteidel h 
Photon is an addictive tirne-muncher in the spirit of I^ntrMotgf^ and Tetrip*. Match wi is with 
Ludevide, \hcevi) power Aioid t as you reason yourway through over 60 devious levels- The numerous- 
original music scores, dig) tized speech and sound effects, and pleasi ng animation and grsi phks enrich 
Photon tu rtaiut it a n unparalleled gaming experienL e. Soon to be released on a variety o t computer 
platforms, thcCoto Common ity is lurjey enough io be given flr^i gknee at tliLs fantastic game! Req. 
lZSkCoCo-J, disk drive, and joys lick. 

$34.95 
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50% OFF! 

Su ndogSyslrms is bbuvmg deselected back-slock software, and you can now take advanlagcof these 
hargai n* to complete your Sundog collect ion' For a Itmi ted time, you can buy someof the best CoCo 
games at 5&h o$ retail prke!! Half off factory -new game software . . . you'll never find a better deal' 
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GRANITE COMPUTER SYSTEMS 

ZOOM MODEMS 

NEW: 14,400 BPS ZOOM V.32bis/V.42/V.42bii data modW, MNP1 -5+LAPM. 
Error Correction and data compression (much higher effective throughput — as much as 
(5 7,600 B PS). Two Year Warranty. External (339/1 nternal J299 (+S9 S&H) 

NEW LOWER PRICE! 9600 gPS ZOOM V.12/V,42/V.42b!s data modems. MNP1 -5tl APM. 
Frror Cortection and data compression (much higher effeclive throughput — as much as 
3B400 BPS). Two Yeai Warranty. Enternal $299/1 nternal $279 (+$9 S&H) 

N1!W LOWER PRICE! 2400 BPS ZOOM V.42/V.42bii data morleins. MSP1-S+LAPM. 
Error correction and data compression (much highef effective throughput — at much as 9600 
BPS). Two Year Warranty, B(B:rnal$149(+$9S4H) 

NEW PRODUCT! 9600 BPS ZOOM Send/Receive Fax modems. 

5end/Keccivc lexl/graphics files (rom/to your oompuler/any Fax machine in the world. Full 

2400 BPS data modem capability. Seven Year Warranty. 

Incl udes PC or MAC FAX software. Ex ter rial $1 39/ 1 nternal $ 1 29 ( +S6 S&H ) 

NEW LOWER PRICE! 2409 BPS ZOOM Dala modems. 

Seven Year Warranty External $85/1 nternal $75 (+$6 S&H) 

These are all high quality modems made by Zoom Telephonies in the USA. Fully Hayes 
com pat i bio. Terminal and Windows Fax software available. Cables available. 
SSHCanarJatAirPPandlns):V.32,V.4Z/V.42bis$13.00 Send/Receive Fax/Dala $9 .00 

GCS FILE TRANSFER UTILITIES — Version 3.0 

The GCS File Transfer Utilities provide a simple and quick method io Iransfor lextrbinary file* 
fromAo a variety of floppy disk formats. 



Comnvind*. 



PC, RS, FLEX disks: Dir r Pump, Read, Write 
PC disks: Rename, Delete, Format 



Happies rtiosl 5,25 and 3.S formats. Any level sub -directories {PQ. Binary files. Use pipes for 

multiple ftle transfers. Multi-Vue version can be uictf under Mulii-Vuc or as standalone Shell 

commands. 

Requires OS-9 L.2 for COCO 3 r LI for COCO 1 or 2. 2 drives (one can be hard/ramdisk, one 

floppy 40 T DP DS), Multi-Vue forMulli-Vue version. SDISK3 for COC03 - SD1SK for COCO 

1 or 2. 

OSK version price 599,95 

Multi-Vue version $54.95 Standard version J44.95 

VMt updates (provide disk number) S25.oti/$15.uu 

CU* + Johnson Software SDISKor SDISK3 $25.95 L1+L2 Uiils S75JX) 
Shipping and handfling — any software S2.50 U.S.A., S3 00 Canada 
Orders must be prepaid or COD. VISrVMC accepted. COD is additional. 
571 Center Road, Hillsboro, NH 03244 USA 
(603) 464-3850 

OS-* ii i ii-jriHiurir: «T MicTM/tf* SyiMin* C^pw*K>n md M^xw oli, Ini 
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Program Update 




Inspired by requests from readers of my 
five-part series "UlttQlave" (May through 
September 1991), 1 have incorporated 
some new features into the Ultralace 
programs ULT and ULE. 1 have also made 
some corrections lo ihose programs, elimi- 
nating problems encountered by some Ul- 
tralace users. 

The Ultralace patches and upgraded 
features are incorporated into AITUL (List- 
ing D.Enterthe listing carefully and save ii 
to disk in ASCII formal by entering SAVE 
"ALTUL" .A. Next, make a copy of your 
working Ultralace disk (the file disk)* From 
the copy, load ULT or ULE, whichever you 
use. Insert the disk containing ALTUL in the 
drive and enter ^ERGE-ALTUL". When the 
disk stops spinning, the merge is complete. 
Put the copy of the Ultralace disk back into 
the drive and save the combined programs 
as ULT or ULE, whichever is appropriate. 
This copy of Ultralace now becomes your 
working copy t but it would be wise to save 
the old disk — just in case. 

New Features 

A number of readers expressed a desire 
to substitute their own artwork for some of 
the designs presently appearing on the Ul- 
tralace Design menu. I added a feature to 
solve the problem of fitting "user" artwork 
in the proper menu slots. The new feature, 
the Generate Design command, has some 
other interesting applications. 

The G command replaces the contents of 
any two adjacent slots (from left to right) in 
rows 2 and 3 of the Design menu with the 
contents of a 96-pixel -wide -by-48-pixel- 
tall area on the text screen of ULT or ULE. 
The C command is contained in lines 42, 
1 28, 1 30, 132, 1 37 and 528 through 534 of 
Listing 1. 

How can the G command be used? Let ' s 
take a look. Suppose you want to magnify a 
si ng le-slot piece of art work in Row 2 or 3 of 
the Design menu to occupy four slots, each 
covering a 96-by-96 area onscreen. We'll 
use the built-in Lincoln artwork for this 
example. 

Select Font 1 from the Font menu, then 
position the cursor at the top-left comer on 
the text screen. Now use Option 3 of the A 
command to select Lincoln at double his 
normal height and width as he appears in 
Slot 2a. When you return to [he text screen, 
hold down the Shift key and press the right 
arrow to draw the image. To return the 
cursor lo the top-left position on the screen, 
press ENTER followed by the up arrow. 

At this point, you are ready lo use the G 
command — press G, When the l^esign 
menu appears, press 2 followed by the 
lowercase letter a. After you return to the 
text screen, press ENTER three times lo 
position the cursor where you can get the 
lower half of Lincoln's image. Press G 
again, but this lime when the Design menu 
appears, press 3 followed by a lowercase a. 
Now clear the texl screen and you are ready 
to redraw ihe artwork. 

JJsti Option 3 of the A command, and 
when the Design menu appears, press 2 
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followed by a lowercase a. To draw the top- 
lefl quarter of Lincoln's visage, hold Shift 
and pre ss the rig h t arrow when you return to 
the text screen. Use Option 3 of the A 
command again to select Slot 2b. Return to 
the text screen and finish drawing the top 
half of the image. Then press ENTER six 
times to position the cursor; use a similar 
procedure to select and draw sluts 3a and 
3b, Remember to hold Shift and press the 
right arrow each lime you return lo the text 
sLTeen. When you are finished, you should 
have a 1 92-by- 1 92 picture of Li ncoln on the 
text screen. 



As another example, suppose you are 
developing a iwo-eolumn newsletter and 
you want the title to he printed at twice the 
height and width the chosen font can nor- 
mally produce. For this example, the de- 
sired title is Private Time $> the font is I, and 
the tille is lo be apportioned equally be- 
tween the left and right columns. 

Fi rst clear the te xt scree n. Then press the 
space bar 10 times; use the T command to 
keep a record of the c ursor position (press C 
for both tab sellings). Now lype Private 
Times, using a single space between the 
words. Use the P command to see that the 



previous cursor setting was I6CK Now use 
the T command to preserve both thai selling 
and the present one at the right of the title. 
(That is , with the T command set the tabs to 
160 and C, respectively.) Determine the 
number value of the latter to be 336 by 
employing the P command. The center point 
of the title is then .5 x (160+336) - 248, 

To gel the left half of the tille with the G 
command, the cursor must be 96 pixels to 
the left of the center point. Use (he T com- 
mand to set the labs to 152 and 24R. When 
you return to the text screen, press CLEAR 
to position the cursor. Now use the G 
command to copy ihe left half of Private 
Times into Slot 2c of the Design menu 
(when the Design menu appears, press 2 
followed by a lowercase c). 

When the text screen reiums, press 
CLEAR to position the cursor at the mid- 
point of the title . Use the G com mand aga i n , 
but when the Design menu appears, press 2 
followed hy a lowercase c. Now clear the 
lext screen. 

Now we need to set the margins needed 
for a two-column printout — use Option 2 
of the H command. Using the P command, 
find that the right margin of the left column 
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Editor's Note: Listing I, ALTUL , is designedly be merged with an existing 
Ultralace program. As such, it is saved in ASCI f format on this month's RAINBOW 
on disk, rainbow on tape subscribers need to toad the program from tape and 
save it on disk in ASCII formal before merging. 



Listing 1: ALTUL 

36 L2-l:P-176:DIMFt(84).M<84) 
42 HBJFF4.320»:H8UFF5.2104:HGET( 
0.0)-<639.19).4:HBUFF6.1S28:KBUf 
F2.650 

72 IFK-32TH£NZ-L+S:IFL+8<W --IK- 
LINECL. T)-U+7.T+D1, PRESET, BF:L- 
_+S;0C"C51S 

73 IFK-32THENHLINE(L.T)-(L+l.T+0 
). PRESET. BF:L-U:IFT<P AND T-C191- 
2*0 TIIENT-T+l+D:GOTO50ELSErL-0:G 
0T0444 

76 IFK-13 AND KP THENT-T+1+D :S0 
T054ELSEIFK-13THENIFSCI-2THENSKI 
-"-:SK-0:GOTO430ELSES4 
80 IFK-93 AND SCI02THENJFH-1THE 
NSOUND60.9:GOTO58ELSEZ-U:HLINE(L 
.T)-(L+1.T+D), PRESET, BF:1FL+DX-1 
<W THENL-S*1NT(.125*L):HPUT<L,T) 
- ( L+DX- 1 .T+DY - 1 ) .5: L-L+DX: GOTO50 
ELSESOUND60.9:GOTO50 
128 HSCREEN0:CLS:AITR8.4:LOCATE1 
fl.4:PRINT"A: ART-DESIGNS" : LOCATE 
10.5:PR1NT"B: BACK TO SCREEN":L0 
CATE18.6:f>RINT"C: CONVERT WPF";l 
0CATE1B.7:PRINT"D: DI R" : LOCATE10 
,8;PRINT"F; FONT SELECT" : I 0CATF1 
8.9:PRINT"G: GENERATE DESIGN 
130 LOCATE10.10:PR1NT"H: H0USCKE 
F PING": LOCATF10,11 : PRINT" I: [NPU 
T":LOCATE10.12:PRINT"K: KEYS LIS 
T£D":LOCATE10,13:PRINT"M: MARGIN 

SET" : LOCATE10. 14 : PRI NT"0: 0UTPU 
T":LOCATE10,15:PRINT"P: PRESENT 
STATUS 

132 LOCATU0.16:PRINT"R: RE50LUT 
ION CHANGE" :10CA1U8, 17: PRINT'S: 

SCREEN DUMP";LOCATE10.18:PR[NT- 
T: TAB SET" :L0CATE18. 19: PRINT'S: 

EXIT UltraLace":LOCATEI0.20:PRI 



NT"Z- ZAP (KILL FI LET : L0CATE14 . 

19 : P0KESH23 , Al : P0KE4H24 .A2: POKE! 

HFFD8.0 

135 IFK(-"Z" OR Kf-"z"THEN524 

137 IFK$-"G" OR KJ-"g"THEN528 

324 CL5:L0CATEB.1B:PRINT"1: 1C0L 

1IMN/4SCREEN" : LOCATES, 11 ;PRINT"2; 

2CCLUMN/8SCREEN": LOCATES, 12: PRI 
NT"3: 3C0LUMN/12SCREEN": LOCATES. 
13:PRINT"4: CANCEL ANY OF ABOVE" 
: RETURN 
348 CLS: LOCATES. 10: PRI HT~1 : SAVE 

FULL SCREEN*; LOCATES, 12 : PRINT"! 
: SAVE HALF SCREEN" :L0CATES . 14 : P 
RIKT-3: SAVE DESIGN MENU 
350 G0SUB322:IFKi-"l"THENGQSUB48 
4:G0SUB26:G0T0128ELSEIFKJ-"2"THE 
NGOSUB404:GOSUB28:GOTO12SFlSf IFK 
(--3"THEN536ELSESOUND60.9:SOTO12 
8 

396 G0SUB322:IFK*<"1" OR K$>"4"T 
HENS0UND68,8:G0T0128ELSElFKS-"4" 
TKEN522ELSEHF-1:HR-1 ;HS-76:IFKt- 
"l"THENHK-l:U-0:W-640ELSEIFK*-"2 
"T[[CNIIK-2:U-64:W-47ZEL5EHK-3:U-3 
2:W-320 

518 IF5CIO0THEN50ELSEIFH-3THENB 
2-8:83-. 125ELS£B2-4:B3-. 25 
520 LQ-L-S:B3-B2*FIX(B3*L);L-B?+ 
B3:Z-L:HLINE(L0.T>-CL-1.T+D),PRE 
SET.BF:IFL>-M THENL-LO;HLINE(L. T 
) - ( L+l , T+D) . PRESET. BF : L-640: Z-U: 
GOTO50ELSE50 
522 HK-0:CC-0:GOTO128 
524 CLS:LOCATE0.5:PRINT"DO YOU R 
EALLY WANT TO KILL A FILE? (Y,N) 

526 Kt-INKEYt : I FKf-""TH£N526ELSE 
1FKJ-"V" OR KJ-"y"IHtNCI S: LOCATE 



2.5:PR1NT"ENTER FILENAME. EXTENS 

ION, S DRUE NO.":LINEINPUTK$:KI 

LLKt:G0T0128ELSE128 

528 IFH-1THENS0UND6B,9;G0T0128EL 

SE60SU8534:HGET<L,T)-<L+9E,T+47> 

,2:EXEC1HF00:GO5UB534 

530 K*-INKEYt:lFKI-""THEN530ELSE 

K-ASC(K*):IFK<50 OR K>S1THENS0UM 

D60.9:GOTO53BELSEIFK(-"2"THENMY- 

96EI.SEMY-144 

532 Kt-INKEYt: IFKJ-""THENS32ELSE 

K-ASC(KJ):IFK.<97 OR KH06TMENSOU 

ND68,9:G0T0532ELSEK-K-97:HX-32+K 

M8:HPUT(MX.MY)-(MX+95,MY+47).2: 

HSCRtFN0;tXEC&HF00;GCHO128 

534 P0KE£HE6E4.SHE6:HSCREEN3:P0K 
EMIE6E4.SHE7: RETURN 

535 EX£CSHF00:KIIL"I)H£NU/HR1":KI 
LL"DMENU/HRZ":G0SUB212:Ft-"DMENU 
":6OSU626:EXECSHFfl0:GOTO12S 



Listing 2: artwork 

10 GOTO60 

20 CLS:LOCATE4,10;PR1NT"SAVING D 

MENU7HR1 AND 0MENU/HR2" : FOR1-0TO 

1S0B:NEXT 

30 P0KE&HE6F4,&HE6:HSCREEN3:P0KE 

SHE6E4.&HE7 

40 POKE&HFFA2,&H?0:SAVEM"DMENU/H 

R1".&H4000.SH5FFF.SHAC73:PCKESHF 

FA2.SH71:SAVEM"DMENU/HR2",SH4008 

.MSBFF, MAC/3: P0KEMFFA2,SH?A 

50 L0CATE4. 10: PRINT" SAVED OMENU 

7HR1 AND DMENU/HR2":END 

60 CMP ; F-ALE.TTE0 .63 : PALETTE1 .0 :HI 

DTH80:HSCREEN1:HCLS 

90 REM INSERT LINES 108 TO 300 

AS NEEDED TO ORAM AND PAINT YOUR 

CREATIONS FOR THE DESIGN MENU. 
318 ON BRK GOtG 330 
320 GOTO320 

330 Wl£iTH40;CLS:LOCATE2.10:PRINT 
"00 YOU MANT TO SAVE THE JUST OR 
AWN SCREEN? CY/N> "; 
340 Kt-lNKEY(:IFKt-""THEN340ELSE 
IFK*-"Y" OR KS-"y"THEN28ELSEEND 
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is 472. The left halt of the magnified title 
occupies two Design-menu slots, covering 
a width of 192 pixels. The proper cursor 
position at [he beginning of Private Times 
is 472-192 = 280. Therefore, set both tab 
values to 280 using the T command. When 
the text screen reappears, press CLEAR to 
position the cursor. Use Option 3 of the A 
command to select Slot 2e of the Design 
menu, then follow the procedure outlined 
for Lincoln's image to put the top two 
quarters (slots 2c and 2d) of the image on 
the screen. 

Rather than going through this process 
every t ime you pri nt an issue o f the newslet- 
ter, save the screen as is. Then you could 
call it each time you are preparing a new 
issue. 

To get to the top-right column to finish 
the printing of the magnified title you must 
now save three more screens, all blank. 'ITie 
left margin of the right column is set to 8, 
but you will want to have the rest of the title 
displayed beginning at 0. Therefore, keep 
pressing the left arrow until the cursor is at 
the extreme left. Then put the remainder of 
the title on the text screen using Option 3 of 
the A command twice: First select slot 2e 
and then 2f. following each selection with 
ShUt- right arrow when you return to the 
text screen. You would save the screen 
along with three more blank screens. 

There is one caution when using the C 
command: The eursor must always be placed 
at a pixel location whose value is exactly 
divisible by S before calling upon the O 
command, If, for example, the center point 
.if Private Times had been 240, you would 
have Chosen I lie nearest cursor position to 
246 that is divisible by H. In this case, J CHI 
would select 248 for the midpoint. 

You xre the Arlist 

The time nasconw to explain howtheG 

command cart facilitate the subsTilulion of 
your own artwork for some of the designs 
on die Design menu. Enter [he HURMI and 
HP A I NT commands necessary to create your 
artwork into lines 1 00 through 300 of Mi 
M0RK (Listing 2). Be sure To save a copy in 
ease you make a mistake. When you run 
ARTWORK, it displays your oreaiiun. Press 
BREAK and the program will save your 
artwork in two files, DHENU.HRl and 
DMEN U . H R2 . Caution: Sa ve t hem on a differ- 



cm dink than your new Ullralaee rftflfc. Now 
execute Ultratace and choose 1 for I he font. 
Insert The disk containing the newly saved 
DMESU files, and use Option I of the I com- 
mand to load them onto the Ultratace screen. 
When you are asked for the filename, sim- 
ply enter DHENU. 

When your artwork appears onscreen, 
use the G command as you did with the 
Lincoln example above. After you have 
copied yourartwork into Ihe desired Row 2 
and/or Row 3 slots of the Design menu, put 
your working Ullralaee disk into the drive. 
Finally, use another new Ullralaee option. 
Option 3 of the O command, which auto- 
matically saves ihe files DMENU.HR1 and 
DMENU.HR? on the disk in Drive 0. When 
yott arc finished, you will have a new De- 
sign menu containing your own artwork. 
(Lines 348, 35(1. and 536 of Listing I are 
used to incorporate Option 3 of the O 
command.) 

Zapping Old Files 

Another new feature added to Lliiraiacc 
al I ows ed it ing of screens destined for a two- 
column printout. Formerly, after you had 
saved all eight screens necessary fora two- 
column printed page, you could not do any 
editing because saving a corrected screen 
resulted in an output error. This oceured 
because there musl be at least eighi unused 
granules on the disk, and 35-trackdisk has 
only four free granules alter eight screens 
are saved on it. 

I added the 7. command (for Zap), which 
lets you kill a file on a designated disk. 
Suppose you have saved a page of your 
two-column newsletter Private Times on a 
disk in Drive I. and you used P! as the 
filename. If you want to edit the fourth 
screen of The IciT colams, you would use 
Option I of the I command to load That 
screen image. (The filename would be PTLi. 
You would also append : 1 for ihe drive 
designation). When you finish editing, you 
can now use the Z command to kill the old 
partial save. When asked for the filename, 
you must include its extension — thus, 
enter PTL4/HR1;1. Use the 2 command a 
second time to kill PTL4/KRZ:1, Now it is 
safe to use Option 1 of the O command to 
save PT L4 : 1 . (Lines 1 32, 1 35. 524 and 526 
of Listing I provide the Z command.) You 
don't have to use the Z command before 



Product Review 



DPMax: A Facelift 

for the 
Delta Pro Interface 



Rough ly one year ago Lu cas Indu stries 
2000 introduced the Delta Pro pack — an 
audio digitizer hardware unit — for pro- 
grammers and developers. The interface 
for ihe original offering was workable 
though not the simple si with which to 
enter commands. To make life easier, 
Lucas is now shipping anew menu-driven 
interface, DPMax, with all orders of the 
Delta Pro package. 

DPMax provides a straightforward ap- 
proach to command entry. The menuing 
system provides poinl-and-ctick opera- 
tion lor main menu selections and pull- 
down menu bars to access sub menus. 
DPMax uses the machine-language 
program DCOMM as the main digitizer and 
for disk-access routines. Running DPMax 
enters you into a real-time operating env i - 
rorunent that allows furjump sequencing, 
MIDI playback, real-time memory dis- 
play and level meters, constant audio 



monitoring, and many methods of alter- 
ing recorded sound files. 

System requirements are a CoCo 3 
with one disk drive, the Delta Pro pack, a 
Mulli-Pak or Y -cable, and a joystick or 
mouse. The accompanying manual for 
DPMax is well-written, and using it in 
conjunction with the new menuing inter- 
face should prove much easier to under- 
stand than using the original software 
offered with the Delta Pro pack. 

DPMax offers many features for when 
you're making a recording. You can set 
sampling and playback rates, adjust the 
master clock rate, set the audio filters be- 
tween high and low, set outpui to both ihe 
left or right headphone speakers or toggle 
between them for a stereo effect, and use 
an expand mode to produce longer re- 
cordings. Recordings can be modified in 
many ways, and where they reside in 
memory can be adjusted. 

Users can also implement the older 
DC0MK command interface. DCOMK allows 
direct keyboard entry of specific com- 
mands for playing, loading, altering sound 
files, and accessing certain disk routines. 
With DPMax you can store up to seven 
DCGH.M command sequences (jump mini 
sequences) in different buffers for quick 
and easy file manipulations at the touch of 



saving screens intended for one- and three- 
column documents. 

It is worth noting why there must be at 
least eight free granules on a disk before 
you can save a full screen on il. Disk QASJC's 
SAYtM command can be used to save the 
contents of any portion of Memory Bank 7 
(the 64K bytes between addresses $70000 
and S7FFFF). Ullralaee screens reside in 
Bank 6. Before a screen can be saved, it 
must be switched with a portion of Bank 7. 
How r ever, the needed portion of Bank 7 
contains much of Ultraiace (ULTorULE) — 
after the swap has been made, the BASIC 
interpreter loses track of where most of the 
strings are located, including the filename 
you designated for the screen to be saved. 
To counter this, a full screen issavedintwo 
files temporarily named 0UT1.6IN and 
0UT2, BIN. The two files require eight gran- 
ules of disk memory. When the save is 
completed and the memory banks are again 
switched, these files are renamed in accor- 
dance with the filename you entered. 

Another Option and Some Fixes 

1 have added a fourth option to the H 
command. If you select a specific number 
of columns then change your m ind, you can 
now cancel the previous selection by using 
Option 4. Lines 324. 396 and 522 of Listing 
I add this option. 

When you type text directly on the Ul- 
lralaee screen, left justification is usually 
imperfect. Tit at is. the first character of one 
or more lines may be spaced slightly lo the 
right of the left margin on the screen. This 
imperfecl alignment is a result of Ultra- 
lace's word-wTap feature. In order to keep 
up with fast typists, ihe program uses a 
quick HGET/HPUT command pair to transfer 
any partial wrap-around word from the end 
of the line to the beginning of the next line. 
These- commands Transfer The partial wrap- 
around W'ord as desired only if the first 
character of the word has been drawn start- 
ing at a pixel position exactly divisible by 8 
or 4 (depending on the resolution of the 
screen you are using). The probability of 
this happening is 1/4 to 1/2. 

Lines 72. 73, 518 and 520 of Listing 1 
cause every w r ord of typed text lo begin at a 
pixel position divisible by 8 or 4 for the 
high- and low-resolution screens, respec- 
tively. This placement of all typed words 

a butto n. Direct c nrry of DC MM commands j 
can also be achieved using the Direct op- 
tion from a pulldown menu. 

Another new machine-language pro- j 
gram offered with this package is DACC0MM. ( 
DACCOMM is similar to the DC OHM program ' 
suppliedwithiheDelta Pro pack. It al lows i 
playback orDelta Coded material without ; 
the Delta Pro pack. Now programmers 
can include the high-quality recordings 
produced with the Delta Pro pack in their 
programming endeavors. Delta Code is 
very efficient, so sound storage will take 
less RAM than other digitizing packages 
available in the CoCo market. DACCOMH is 
provided as public domain software. 

The author of the Delta Pro pack re- 
view (toe RAINBOW, May 1 9 9 1 , Page 64) 
was unclear as to the product's intended 
market. This was due mainly to the tech- 
nical aspect of the product and the inter- 
face. With DPMavine learning curve has 
been reduced and the Delta Pro pack is 
now less unwieldy for Ihe average CoCo 
user. (Lucas Industries 2000, 14720 Ce- 
dar Street NE, Alliance, Oil 44601 ] 2 16- 
$23-422 1 ,- included with rfte purchase of 
the Delta Pro package, which is available 
for $129,9?.} 

— Jamie Henscn 



guarantees perfect left justification. This 
was accomplished at die cost of introducing 
irregular spacing between words. 

The presence of The high-speed poke in 
Line 36 of U L T and U L E has been reported to 
have caused some input -timing problems. 
Therefore Line 36 of Listing ] appears 
without that poke. 

Another problem I fixed is the occa- 
sional overwriti ng of t he bottom I i nc of the 
text screen during ASCII-file input. Lines 
76 and 80 of Listing I provide corrections 
to eliminate this problem. 

The following corrects afinal oversight: 
Those of you who have Tandy DMP print- 
ers that print 960 dots perline instead of 800 
should insert 

P0KE4689 . 160: P0KE4938. 33 : 

at the very beginning of Line 17 in ULT. 
Furthermtire, if the control-code sequence 
for the 960-dol-per-line graphics mode is 
not 27 followed by 20, change Line 24 of 
ut [ accordingly. Finally, if the second value 
of the left margin control code sequence is 
nut 10. add the following to the beginning 
of Line 17: 

P0Kf.4682.n: 

where n represents the second number in 

ihe left-margin code sequence for your 
printer. 

1 hope the improvements and correc- 
tions presented here will make Ullralaee 
even more enjoyable and useful for you. 



//, Allen CurHs is interested m 17 th and 
Ifith century history and enjoys biking 
through the colonial capital, lit balances 
past and present with his computer work. 
He can be contacted at 172 Dennis Drive, 
WillkmtsbHrg, VA 231R5. (S04) 229-7086. 
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Optimizing Disk I/O 

Downloading files from local BBSs ami 
online services can he 8 lot of fun. How- 
ever, the myriad of file formats available 
across various computers can al so make Lhe 
experience somewhat less pleasant. For 



example, while researching information for 
the modem article in the March issue. I 
found an excellent document detailing the 
inner workings of the MNP protocols and 
other modem trivia on a UNIX-based sys- 
tem. Unfortunately each line was termi- 
nated with linefeeds that needed To be con- 
verted to carriage relums so 1 could read the 
document on the CoCo. At first I decided to 
use a filter called t r to perform the conver- 
sion. If you aren 't familiar with the term, a 
filter is a utility that reads data from die 
standard input path, processes it. and writes 
the processed data to the standard output 
path, in this way. data can be sent via a pipe 



OS-9 



Listing 1: trs.c 

find tide <stdlo,h> 

mainOrgc, argv) 
1 n t argc: 
char- *arg/[]; 
f 

FILE *fp: 

long pos: 

char f: 

char old. new: 

pfTlnitO; 

if (argc < O 
help!): 

old - (char) atol (argvCH); 
new - (char) atc-1 <argY[2j); 
fp - fppen(argvt3). "r+">: 



wnl le( ! ■ 



pos > : 



pos - ftelllfp): 

printf("191dU)\bM>M)M>\ti\b\bur 

fflusMstdout): 

1 - (char) getc(fp); 

tftfeof(fp)) 

exlttfl): 

if{i — old) 

1 ■- new; 

fseeMfp, pos, B); 
putc(Mnt) 1. fp); 

fseekffp, (long) (pos + R), 0): 



1 

help!) 
I 

printf{ "Usage: tr [old byte] [new byte] [filenam 
printf["Example: tr IB 13 letter. doc\n">: " 
Drintf ["converts LF to CR in file letter. docW): 
exit(0) ; 



[]\n\n">; 



with a command similar to 



list modem. doc I tr 10 13 > node 

ml. doc 



written before the next byte is read. The 
overhead involved in reading individual 
hytcs is enormous. If the fde to be con- 
vened is small, (ho overhead may not be 
noticeable. Unfortunately the file [ needed 
The disadvantage with filters is that data to convert was rather large — in the neigh- 
is lypically processed one byte at a time. In borhood of 250K. 
other words, one byte is read, processed and At this point 1 decided to write my own 



Listing 2: trb.c 

^include <stdio.h> 

unsigned BlocltSize - 16384; 
char block [16384]; 

matntargc, argv) 
Int argc; 
char *argv[l: 
I 

FILE *fp: 

long pos: 

unsigned 1 ; 

char old. new; 

pfl inltO; 

iftargc < 4) 

helpO; 

old - (char! atoKargvU] ); 
new » (char) atot(argv[2] > : 
fp - fopen(argvL3K "r+"): 

nh(leil) 

( 

pos - ftell(fp); 

print f("X91d\b\b\b\b\b\b\b\b\b". pos): 
ff 1 usnt st.d out); 

ir((rread<block. stzeof(char). BlockSUe, fp)) !• aiockSize) 
( 

if(BlockS1ze — 1) 
exlt(B); 

BlockSl ;e /- 2: 
fseektfp, pos. 0); 

continue: 
) 

ford - 8; i < BlockSize: 1++J 
iftblocktij — old) 
block! i] - new; 

fseekffp. pos. B)t 

fwritelblock, sizeof(char) , BlockStze, fp): 

fseektfp, (long) (pos+ (long) BtDckStze), B): 



help!) 
I 



prlntf ("Usage; tr [old b»te] [new byte] [f1 lename]\n\n"); 

prlntf ("Example: tr 10 13 letter .doc\n"); 

prlntf ("converts LF to CR in file letter, doc\n") ; 

exiUB): 
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The following products hove recently 
been received by THE RAINBOW, examined 
by our staff and issued the Rainbow Seal of 
Certification, your assurance that we have 
seen the product and have ascertained that 
it is what it purports to he, 

CoCo Cassette #1 13. a variety of programs 
presented monthly for the CoCo 1 , 2 ami y 
This issue contains Graiie Book, keeps track, 
of your grades on tape or disk: Bingo 
Checker, plays 12 different bingo cards 
simultaneously; Caverns of Oh No. a text 
adventure: Beauty Paget?nt T scores up to 1 2 
contestants to help determine a winner; 
Telesale, tracks your current, future, or 
prospective clients by address, phone 
number, contact, and salesman; Cryptvquip, 
a puzzle game: Crionaum Warrior 3. a 
CoCo 3 graphics game in which you must 
exit a building safely; Picture 3* a program 
lor viewing and printing binary pictures on 



a DMP- 1 00 or DMP- 1 05; Solitaire Puzzle, 
a puzzling peg solitaire game; and Froggy, 
a machine -language Fr&ggef clone. T & D 
Software. 2490 Miles Stundish Drive , Hol- 
land \ MI 49424 ,(616) 399*9468 , $8 . 

The CoCo Family Recorder, a geneal- 
ogy database for the CoCo 3, Requires an 
£0-column RGB monitor, and two drives. 
Monochrome versions are available upon 
request. This program is designed to help 
you track family members throughout his- 
tory. The data is also compatible with a 
modified version of the MS-DOS program 
Genealogy on Display. FARNA Systems, 
904 2nd Avenue, Robins AFB, GA 31098, 
(9J2) $28-7859; $29$5, 

firafKxpress 2.0, two graphics and music 
programming environment systems — one 
for I G-eolor graphics: another for 256~eolor 
graphics. Mix different size fonts and text 
with graphics. Use these systems to create 
sprites [animated objects! and windows. 
Create K-octave/4-voice music and inde- 
pendently control the waveform, envelope, 
volume, and sampling rate. Supports the 
12S/512K CoCo .1 and Hi-Res joystick inter- 
face. Requires a CoCo 3 and a disk cirivc . 



Sundog Systems, P r O. Box 766, Manassas, 
V A 22111. $703} 330-8989; $34.95 phis 
S2J0S/H 

Optimize Utility Set 1. two utility pro- 
grams for OS-9 that increase computing 
efficiency, optimize and inq both deal 
with fragmentation and the padding of di- 
rectories with blank entries by eliminating 
fragmented Tiles and compacting your di- 
rectories for faster disk access. Rcqu i res the 
OS-9 operating system. JWT Enterprises, 
5755 Lockwood Boulevard, Youngstown, 
OH 445 12. (216) 758-7694; $29.95. 

Optimize Utility Set 2 T works as a comple- 
ment to Optimize Utility Set I by verifying 
a d isk ' s integrity to avoid pro blems wi th the 
Set 1 and normal disk operations. Set 2 
contains two utilities: dfrcheck and 
darncheck. dtrcheck checks and corrects 
problems with the directory structure on a 
disk, dame heck, similar tod ircfteck. works 
with the disk's allocation map to account 
for every fde on the disk. Requires the OS- 
9 operating system, JWT Enterprises, 5755 
Lockwood Boulevard, Yinmyastown. OH 
44512, (216} 758-7694. $1935, both sets 
available for $3995 



War Monger — A World at War, a 320- 
by-200 resolution, lo-color graphics war- 
game simulation that can be played by the 
computer, between two players, or by a 
player against the computer. Design the 
type of terrain with the built-in construction 
set/simulator or use the terrains provided. 
Each army is made up of one Id 60 units: 
and each unit has its own unique strength, 
firepower, range, movement capabilities, 
icons and other characteristics. Wars can be 
saved on disk . Req uires a CoCo 3 and a disk 
drive. Sundog Systems, P.O. Box 766, 
Manassas, VA 22111. (703) 330^989: 
$29,95 plus $2.50 S/H. 

The Rainbow Seal of Certificate 
open to ait m&titfatturers W ■■■ 
applicable u> the Tandy Color Com 
purer. regardlesfcfwhether or run those 
companies advertise in rffE RAINBOW 
By awarding the Seal, we certify the 
prodia i have a sample 

and have examined it. tiwrwt thu 
dees fi any ^usrtmti > |J 

tctjpn. As sooti as possible 
products will he forwarded to wicv, en 
fat evaluation. 
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version of ir to demonstrate the effects of 
reading and writing one byie tit w Lime. 
However, my version of this utility altera 
the original file instead of writing the 
changes to a secondary fife. (Refer to List- 
ing I for the following discussion.) 

First aEI variables required by the pro- 
gram are dec! arcd and p f 1 1 n 1 1 U is cat led 
so the compiler will include the routines 
iilvi^j:-} fiiT[iTiii:in,u U*m2 inlegers. The i f 
statement is used to ensure at least four 
arguments are included on the command 
line. If you forget to specify any of the 
required parameters, helpC) is called to 
print the command-line syntax and an ex- 
ample. The next step converts the second 
and third arguments on the command line 
from ASCII to integers and assigns the 
result to old and new. The variable old 



contains the value to be modified, and new 
coniains the value to which the previous value 
is changed, In other words, each occurrence of 
old in the file is replaced with new. Then 
fopen( ) is called to open the specified file in 
the Update (read and write) mode. 

Although it may look strange, the whi le 
loop is used to step through each byte of the file 
until EOF (end-of-file) is reached. This might 
have been more obvious if I had used 
whi1e( !feof { fp) >. However, EOF cannot he 
checked at the heginning of the loop because 
fseeM ), which appears at the bottom of the 
loop* resets the EOF flag. Therefore whi 1 e( 1 > 
is used to force the while loop to continuously 
repeal , and an EOF check is performed imme- 
diately after each byte is read. More on this in 
a moment. 

At the beginning of the while loop, f te 1 1 i ) 



is called to obta i n 1 he c u rrent position in 
the file. This value is assigned to the 
variable pjja, which is then printed on 
the screen. In the pr 1 rttf i ) statement, 
the- value of pos is printed with a field 
width of nine spaces followed by nine 
backspace characters. This is done so 
that each successive value of pes is 
printed at the same location on the 
scree [i. The output of a high-level I/O 
function is stored in a 256-byte buffer, 
and the contents of that buffer aren't 
actually written to the output device 
until the buffer is full. For that reason, 
ff lush( ) is called to force the buffer to 
be written to The screen. 

After the current location in the file 
is printed, a byte is read from the input 



Listing 3: t P . c 


t 




(finclude <std1o.ti> 
(define MAX.SIZE 16384 


pos - ftell(fp); 

prlntf! "191 d\b\b\b\b\bU>\b\b\t>", pos); 
ff Tush(stdout) : 




unsigned BlockSIre; 
char block[16384]: 

ma1n(argc, argv) 
int argc; 
char *8i"9v[]; 
( 

FILE *fp; 

long pos; 


BlockSfze - fr-ead(blcck. slzeof (char). HHX_SIZE. 

ford - 0; 1 < BlockSire: 1++) 
lf(block[l] — old) 
blocktf] - neu: 

fseekffp. pos. 0): 

fwnitetblock. slieof (char) , BlockStze. fp): 

fseekffp. (long) (pos + (long) BlockSIze), 0); 


fp): 


unsigned 1: 
char old, new: 


1f{BlockSl2e '.- HAX_SIZE) 
ex1t{0>: 




pflinitd: 


} 

1 




if (argc < 4) 
helpC): 


lielpO 




old - (char) atoi(argv[l] >: 
new ■ (char) atoHargvf?] ): 
fp - fopen(argv[3], P V+"); 


prlntf ("Usage: tr [old byte) [new byte] [filename]\ 

prlntf ("Example: tr 10 13 letter. doc\n"): 

printf ("converts LF to CR to file letter, doc\n"); 

exit(B): 


i\n")i 


whi led) 


) 





fileviaacalllogetc* ). Ay each byte is read 
from the file. OS -9 checks to sec if it has 
reached the end of the file yet. If EOF has 
been reached, an EOF error is returned to 
the C library function that requested the 
data to be read . The library function , in t u m , 
se t s the EOF fl ag as sol i atei 1 w i t h that pal h . 
It is at this point that the program checks the 
EOF flag via if<feof(fp>). If EOF has 
been reached, feof{J returns a value of 
non-zero and ex i t [ ) is called to exit the 
program with an error code of zero to indi- 
cate normal exit with no errors. If EOF 
hasn't been reached ycl t the byte read from 
the file (1 ) is compared with the value of 
old. If the two values are equaU i is as- 
signed the value of new. At this point, 
f see k( J is called to back up the file pointer 
to the byte just read, that byte is replaced 
with the current contents of i , and f seek ( ) 
is called once more to position the file 
pointer at the next byte to be read* 

Block Splitting 

The next version of the program (see 
Listing 2) is similar to the first, but it reads 
and writes data in variable- length blocks 
with a technique known as black spHttmg. 
In this technique, a 16K array is declared 
(block) to store a block of data from the 
file, and BlocfcSIze is used to keep track of 
the current block size. Note that the initial 
size of the block is arbitrary and can be any 
reasonable size from one byte to several 
megabytes. Obviously a one-byte block 
reverts to the less efficient technique used 
in Listing 1. As a rule of thumb, the initial 
block site should be at least the same size as 
one disk sector (256 bytes on the CoCo), 
but (he larger the better. I decided to use a 
I6K block because it fits nicely into the 
CoCo's 64K address space and allows plenty 
of overhead for the program code and other 
miscellaneous data. 
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In the block-splitting technique, data is 
read from the file in fixed-length blocks 
modi Tied in memory, and the changes are 
written to the file This process continues 
until the data remaining in the file is smaller 
than the size of [he block. At this point the 
block is halved* and the process continues 
with the smaller block size. After several 
iterations of this process, the block size will 
eventually be reduced to one byte and the 
process will be completed. 

The program in Listing 2 is basically the 
same as that in Listing 1 with the exception 
of the win lie loop. Instead of reading a 
single byte, f read ( ) is called to read Bl oc k - 
Size characters from the file. Note that 
f read i ) returns the number of characters 
ruad from the Hie. This information is used 
to determine whether or not the number of 
characters remaining in the file is less than 
BlockSize. If the number of characters 
read is less than 81 ockSi ze» the statement 
tf(fread{.. ,) !- BlocfcSizeJisTrue.In 
this case, Blocks ire is checked to see if it 
has "a valueofone. If BlockSizeisone.lhe 
entire file has been processed, so the pro- 
gram e xit s. If a 1 o c k S i z e has a value other 
than one. Bl ockSi ze is divided by two, the 
file pointer is -repositioned to the beginning 
of the partial block that was just read* and 
program execution continues at the top of 
the whi le loop. 

If a complete block was read, program 
execution continues at the for loop where 
the block is processed. Each byte in the 
block is checked to see i f it m atchc s o 1 d an d 
is replaced with new if the comparison is 
True. Then the file pointer is repositioned at 
the beginning of the block it just read, and 
the changes are written over that block in 
the file. 

To put this into perspective, assume trb 
is processing a file that contains 30,000 
bytes. On the first pass, 16,384 bytes are 
read and that block is processed. On the 
second pass, the remaining 13,616 bytes 
arc read. Because the number of bytes read 
from the file is less than requested, B 1 o c k - 
S I z e i s div ided by t wo and \ he loop con c i n - 



ucs with a block si/e of R 192. On the thin I 
pass t 8192 bytes are read and the block is 
processed. On the fourth pass. 5424 bytes 
arc read and B 1 oc k S \ 1 1 i s again divided by 
two. On the fifth pass* 4096 bytes arc read 
and the block is processed. This continues 
until BlockSlzeisone, which occurs on the 
twenty -first oass. On the twenty-second 
pass, the second \ f test is finally True and 
the program exits. 

Conclusions 

To give you an idea of the speed differ- 
ence, I used both trs (bytc-at-a-time) and 
trb (block- splitting) to convert a 93 K 
document on a Tandy 35 -Meg hard drive 
with OS-9 Level II. Total execution time of 
trs was just over 7} A hours while t»*b con- 




Rvery Color Computer h as what i s cal led 
a keyboard rollover table, a section in 
memory that contains information about 
which key is currently being pressed. Four 
locations in this table can be extremely use- 
ful for programming menu functions and 
graphics-doodling software. The values in 
memory locations 341 through 344 can be 
used to determine whether any of [he arrow 
keys or the four special kcyhnard keys arc 
being pressed. The following table shows 
the key values for these locations. (The 
CTRL, A LT. h 1 and I-1 v a\ ues are val id only 
for the Color Computer 3.) 



PEEK(341} 
PEEK042) 
PEBKQ43) 
PEEK(344) 



ALT 

CTRL 

Fl 

F2 



247 



Up Arrow 
Down Arrow 
Left Arrow 
Right Arrow 



The most common way to use these pecks 
is wiih IF statements in an endless loop. 
Within the loop, test for the keys you need. 
If one is pressed, have the program jump out 
of the loop. For example* you might use 

IF PEEK041I-247 THEM 200 

to lest for the up arrow. 

If you go this route, you may need to use 
delays (FOR/NEXT loops) inside |tie endlos> 
loop tO Skrw the keyboard response, ExpCffi- 
cnent to find suitable debvs. 



verted the same file in approximately 50 
seconds. Although block splitting is much 
niniv irfrkit-ni. ii is Mill rim ihc iiiom effi- 
cient technique. To convert zi 30,000-byte 
file, trs requires 30,000 read and write 
operations and trb requires 22 read and 
write operations. However, it is possible to 
convert the same file in two passes. The 
modified version of trb is shown in Listing 
3. The modified version works pretty much 
the same as t r b , except that the lust block in 
the file is completely processed instead of 
resorting to block-splitting techniques. To 
accomplish this, the constant max_S1ZE is 
used to indicate the maximum size of a 
bl ock, and BlockSi zeis assigned the value 
returned from f readt ), which is the actual 
number of characters read. The entire block 



is then processed and BlockSize is com- 
pared to MAX_SIZE, If BlockSIze is 1c$k 
than MAx_S E ZE + the program exits. As a 
comparison, the modified version converted 
the same 93K in approximately 4ft seconds. 
Although the time saved isn't tremendous, 
the complexity of the code is significantly 
reduced. 



In addition to being OS9 Online SIGop, 
Greg Law enjoys programming on ail types 
of computers and has worked on systems 
ranging from the CoCo to the Burroughs 
86700 super mainframe. He lives in Louis- 
viiie, Kentucky. Greg's Delphi username is 
GREGLAW, /^k 
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:Mavfi^ou explored the wealth of information 
in out past issues? From our very first, four- 
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greal wav to expand your library] 

AWORLDOTTNFO 
At A BARGAIN PRICE 

All hid. issues sell for die single k&nt cover 
price, hi addlfioB, tlmre is a $3.50 charge for 
the firm issue, piles 50 iciiis fur each addi- 
nonal iss ue for postage and handling if sent by 



United Parcel Service, There K a &S charge 
tor the first j*suevpius ail charge for eac It ad- 
ditional issue on orders sent by U.S. Mail. 
UPS will not deliver to a pom office box or to 
aawthft country, 

MOST ISSUES STIIJ. AVAILABLE 
Available issues iftrougti June 1982 arc pro- 
\-ided on white pajHii in a reprint form. All 
Others arc in regular fiiAgdzinc form, VISA, 
MaswsOffd and American HApr«& occupied. 
Kentucky residents please odd 6 parent sales 
tax: Canadian residents, 7 percent GST. In 



order to hold down costi. we dn not hill, and 
no C.CD, ordedti are accepted. 

Due to heavy demand* we suggest you order 

Mic batk isvues y/ffla ■A'snt now while supplies 

last. 

To order, review and fill our the form belt™ 

and mail it v. ith >oht payment 

For grsafa eonvenieuet, order through the 
Rainbow Magtt/.iue Services area of our Del- 
phi CuCoSlG. 



RAJNBOW INDEX 

A complete index for, Juh/ 1 981 through June 1 984, is printed in 
Ih&July 1 $84 issue . Separate copies are available for $2 . 50 pi us 50c 
handling. Indexes lor subsequent years are published annually in the 
July issues of THE RAINBOW. 

TOTAL 

KY RESIDENTS ADD 6% _ 

CANADIAN RESIDENTS ADD 7% GST 

U.S. MAIL CHARGE 

SHIPPING & HANDLING 



U. P. S. CHARGE 

TOTAL AMOUNT 

ENCLOSED 



Article Reprints 

In instances where a given issue is now out ol print and not avaiFabte for 
purchase., we Ho provide pholocopms, of sp&citfo articles. The cost tor this 
Service is $1 .50 plus 50 cenls &H per arlicte. This service is wovided only in 
the case ol out of slock issues. 

Name 

Address 

City 



State. 



Zip 



-i Payment Enclosed orCharge to my: 
Card* 



J VISA J MC ^AE 



Expiration Dale Phone ( ) 

Signature 

TO ORDER BY PHONE {credit card orders only) call (&66j S47- 
0309, 9 a.m. (o 5 p.m. EST. All other inquiries call (502) 226-4492. 
send to: THE RAINBOW. The Falsofl Building, P.O. Box 385. 
Prospect, KY 10059 

Please send me the following back issues: 



AUG as 
SEP 93 

QCTaa 

MARS* 



VOLUME 2 
Pr:nters 
VOLUME 3 

Games 

Graphics 
K :■ -■:?<■ 



$2.95 J 
tP.K J 
£3.95 J 
53 « J 



APR 54 
MAY 84 
JUNS4 
JUL 6* 



sepe:- 

■., ■ ■ . 



Gaming z>~,.'li. Q 

PriTter 13.9S Q 

Hu&t $3.96 Q 

Annrversary S3.ge j 



VOLUME 4 

Gamas 
EduCa-io^i 

UaTavorn™ 



53.55 j 
15.95 J 
V--'-r j 



JAN 65 
TEB85 
MAHB5 
APRSS 
MAV&5 
JUN35 
JUL 65 



AOGfiS 

OCTSS 
MOV 35 
DEC 95 
JAN 96 
FEB£e 
MAftQ6 
APRfifi 
MAY £6 
JUN66 
JUL 99 



AUG 46 
'--EPii 
OCT 96 
NOV £6 
DFCUr 
JUt ft 
FEBE7 
MAR 97 
APR 97 
MA\T*7 
JUN87 
JULS? 



AUG £7 
SiEFS? 
OCT 97 
NQ/V$f 
DEC ft? 
JAM £9 
FOS9B 
WR33 
APft68 
MfiYW. 
JON BE 
JUL 99 



AllC. (SB 
Ofl'JL! 
OCT HE 

NCv SS 

n r -r: a- 

j^m^ 1 ; 



Ho c?.i 
&eginr*i j a 



MjsIc 
Anniversary 

VOLUME 5 

Oamnn 

Educawn 

Graphics. 

Gala Oc-n-n 

Holiday 

Iv.^ '!■''<■■? 

LWh 

Business 

Home Htlp 



Ann ^ersaiv 

VOLUMES 
GaiTiBS 
EduCaEiDn 
O'n-j" :;■; 
Saw Knm 
holiday 
Beginner & 
Uti irtias 
Bysina ss 
Horn* Iglp 
Prtrer 

Aniversary 

VOLUME 7 

GatioS 

0■ ^ fi3^lcs 
OataComTi. 
"C c-i- 
3a-j "if- 
Uttflia* 
B'jSi-taS! 

PnTiar 

Mus*z 
An^vefsary 

VOLUME 9 

£(]i>:a(£in 

Data Corflnfl. 

HolidSy 

E3c<t"ino j v 



_ii - -_^-„ 



53« j 

S3.96 r J 
B.W J 

53.K J 

tasE j 

sa.« u 

sa.*5Q 



S3.W U 
53.5i J 

S3.45fJ 
£3,05 Lt 

53 S5 -J 
53,95 □ 
S3,95U 
53.«Q 
(335 Q 
S3 95 j 
5355 3 



*2Z$ J 

(a»Q 

53 95Q 
53,95 3 
53.95 'J 
53.95 LI 
H95 3 
53.95 3 
53.45 3 
53.95 3 
$3.95 J 
5395 3 



53.95 J 

53.95 3 
5395 3 
5395 3 
53 95 3 
53.95 J 
53.95 J 
5395 3 
5395 3 
5395 3 
$3.95 ji 
53.95 J 



53.9S 3 
53.95 3 
53 95 3 

53.95 J 



1-EBflD 
MAW m 
AIM 1 69 
MAYS9 
JUN£fl 
JUL 69 



AUG 69 
SEP £9 

oct as 

NOV 99 
DEC 49 
JAN 90 

FEB 90 
MAP, SO 
APR 90 
WAY 90 
JUM90 
JUL 90 



ALIflrtC! 

OCT 90 
NOV 90 
DEC 90 
JAN SI 
FFR91 

■,■■■■':-■ 

APR 31 
MAY 91 

JUN»i 
JULS' 



4LG«J' 
SEP Si 
OCT9I 
HOV91 
DEC 91 
JAN 99 
FEB a? 
MAR 92 
APR 9? 
MAY 9? 



kb-..; i'HC 

Haretwars 

&jSiness 

Pnriar 

Stfrnmar Fun 

Aiwwarsary 

VQLUH& 9 

Beyond BASIC 

Edi>raiibn 

G'apf'its 

Data Com rn. 

Ma (lay 

Oegmnerj 

Name Halp 

Hardware 

Business 

Prifflflf 

■"■ . i- ■ ■ i ■ Fun 

Annwersft'V 

VOLUME 10 

0S-9 



Grapnlca 
rJalaComm. 
Hdday 
Bsgmg-s 
Hc*n& H*^J 



Printer 
Summer Fun 
Anniversary 

VOLUME 11 
Graphics 
Edjcalcr 
OS-& 
Dila. Comrfl. 

UlililW 
Hc-na h-: v> 



r3 ^5 J 
53.95 3 
53-95 3 
$3 95 J 
53:35 3 
53.95 3 



$3.95 J 
ijys J 
53.95 3 
53-95 3 
53.95 Q 

53.95 J 
$3 95 j 

53.96 J 
53.56^ 
53.55 J 
$3.3*^ 
$3,95 3 



53.85 3 
$3.95 J 
$3.=* J 
53 95 3 
53.95 3 
53.95 3 
53.35 3 
$395 3 
$3.5fi J 
53 96 3 
5395 3 
53.95 3 



$3.95 3 
5395 3 

53.95 3 
$3,95 3 
$395 3 
$3,95 3 
$3,95 3 
53.95 3 
$3,95 3 
S3.95 J 
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Batch Downloads 

and Database 

Searches 

Delphi adds batch downloading! Many 
of you have been using Ymodesm or 
Zmodem to download from Delphi's data- 
bases, so you know ihai you could down- 
load only one file at a time. Well, that's in 
the past. Using Ymodem, Zmodem. or 
KermiL you can now download several 
files at once. You can download either 
selected files, or all files from a database 
group. Yog tan not. at least yet, download 
files from separate groups with one com- 
mand. If you want to download all files 
from a group, you can enter ZDOH ALL. 
YBDOW ALL or KDOM ALL to download the 
files with Zmodem, Ymodern or Kermii. 
respectively. 

[f you wani only certain files, however, 
yon can specify a range of files or individ- 
ual files. For example, you can type YBODW 
1-17 to use Ymodern to download files I 
t h roug h 1 7 of a database grou p« or you can 
type IDOW 1 1 4 7 [o download only files 
1 h 2 h A and 7 of a database group using (in 
this example) Zmodem, 

Searching the Databases 

You may have noticed that 1 missed the 
last two months, A hard-drive crash last 
November shut down my CoCo. This brings 
me to my first topic this month: periodic 
backups! If you have a hard drive, you 
should be making periodic backups. 1 was 
lucky and didn't lose any tiles; I had a 
recent backup. If y o u aren ' l cu rrent ly back- 
ing up your hard drive, you may want to 
search the databases for back-up programs, 
A back-up program is a utility, and utilities 
and applications are found in the Applica- 
tions (68U9) database. Thus, from the 0S9> 
prompt, the following commands help you 
find all back-up programs available: 

QS9> data app 

Welcome to the OS-9 SIu databases 

DSASES:App> search backup 

Starting a new search. 

BACKUP: 6 found, 

DIRECTORY. READ. WIDEN, and NARR 

OW win now operate on the selec 



DBAS£S;App> dir 

Directory of Selected Items; 

EASYBACK BACKUP UTIL. PROG SEP 

91 TlMLTAYLOR 
BRU/QS-9 BACKUP/RESTORE UTILITY 

PROG JUN-91 DODGECQLT 
S8ACK VI. 0; HDKIT INTERFACE PRO 
6 .HAR-91 SEBJHB 
RECOVER/BACKUP PROG 0EC-S9 SE 
BJMB 

HDKIT: BACKUP/RESTORE PROG MAY 
■89 0S9UGVP 

AftCHHE / RESTORE FACILITY PROG 
NOV -86 CONNOLLY 

No more entries selected. 

Notice thai I typed only enough of the 
database panic to make it unique. Also, 
pressing ENTER by itself ai the 
BASES :App> prompt is a shortcut for the 
DIR command — at any database topic 
prompt, pressing ENTER shows you a di- 
rectory. The search selection lasts until you 
change databases, leave the databases, or 
enter another SEARCH command. In the 
examples that follow, I use sea as an abbre- 
viation for search — Delphi accepts the 
command either way. 

Now that a number of files have been 
selected, you can read them in order by 
typing READ, or you can read a specific one 
by entering, for example. READ HDKIT to 
read HDKIT: B AC KUP/ RESTQ RE . As you might 
expect, you need only type enough of a 
group name to make it unique among all 
selected items. If you type a name that isn't 
unique, Delphi :shows all group names that 
maleh the pattern you entered- Yog can 
often use this to your advantage. For ex- 
ample, if you are searching for a group but 
can*l remember the exact name, use the 
first few characters with ihc RFAD com- 
mand, Delphi then displays a listing of all 
groups that begin with that pattern. 

You can also search for more compli- 
cated patterns of keywords. If 1 wanted to 
search for a C graph ic s 1 ibrary , I might ly pe 
the following sequence of commands from 
the applications database (remembering thai 
libraries will be in ihe Programmer's Den 
database): 

DBASFS:App> set pro 
DBA$E£:l>ra> sea library 

Starting a new search, 
LIBRARY: IB found. 
0IRKCT0RY, READ, WIDEN, and NARR 
0M will now operate on the selec 
ted Items. 

I've found IS entries, hut now 1 want to 
narrow the libraries to only those libraries 



dealing with C. Let's try using the MARROW 
command; 

D&ASE5: Pro> narrow c 
C: 77 found. 
16 found so far. 

Well, that didn't help much. There are 
77 entries in the Programmer's Den with a 
keyword that starts with C, 16 of which are 
entries already selected. We've narrowed 
the choices a little, but not much, I just 
remembered that the library is named 
cgfx, 1* so I'll start anew search: 

DBASES:Pro> sea library and cgfx 

Starting a new search. 
LIBRARY: 18 found. 
CGFX: 5 found. 
3 found so far, 

Ah, this was more successful. There are 
only three groups that have both library and 
cgfx as keywords. Now I'm down to a small 
number of groups. You can also use OR 
where I used ANG above if you want to 
search for several items at once. WIDEN 
works as you would expect: ll selects all 
groups in the current database with the 
given keyword in addition to currently se- 
lected groups. 

When you upload a new item to the 
databases, please put appropriate keywords 
in your submission. As you can sec. this 
makes it much easier to find! 

database Activities 

Greg Law and I have been making steady 
progress in the database reorganization. 
The Tetcom database has been fully moved 
into ihe Telecom (6809) database, and ait 
patches have bec n moved i nto the a ppropri - 
ate databases Patches now belong in the 
same database where the item being patched 
would go. For example, a patch to an appli- 
cation would be posted to the Applications 
(6809) database while a patch to a RiBBS 
utility would be posted in the Telecom 
(6809) database 

We are in the process of copying the flies 
from Graphics & Music into the old, emp- 
tied Patches and Teleom databases. When 
we are finished. Patches will be renamed 
Games & Graphics while Tclcom will be 
renamed Music & Sound. 

(Jetting to the CoCo and OS-9 SIGs 

Delphi has rearranged some menus. The 
CoCo and OS -9 SIGs are no longer avail - 
a ble from t he Groups me nu ; both ft ave been 
moved t" the Computing menu. If you 
automatically enter cither S1G when you 
log on to Delphi, you need to edit your 
settings. To do iftiMypc SET SET DEFAULT 
from either the C0C0> or QS3> prompts. 



Then type COHP COCO Or COMP 0S9, and 
future logons will bring you to the correct 
place, automatically. If you normally log 
on to Delphi at the KA1N> prompt, you may 
want to set your default login menu so ih at 
you automatically enter your chosen SIG. 

October and November Uploads 

One of the most exciting uploads is Kick 
Adams' (RICKADAMS) Online Adventure 
interface in the Telecom (6809) database. 
This application allows you to generate text 
adventures, which other people can then 
play. Online Adventure Interface is written 
so that the game host runs the software on 
his OS-9 system while several people in 
Conference issue special commands to the 
host. Daniel Hauek (hauck) released the 
first new adventure for the Online Adven- 
ture Interface: The Room. Rigk Adams also 
released UUCP version 4.0. 

In the Graphics & Music database. Mark 
Carlson (MARK CARLSON) released the lat- 
est version of the popular play command. 
This version adds the option to play sounds 
through the Orchestra 90/CC cartridge, 
Mark Griffith (marker [Firm) released 
into frog rammers Den source code to a 
CoCo version of termeap, a library of rou- 
tines UNIX programmers commonly use to 
write Icnni I i;H- independent programs. 



G, 



r reg Law 
and I have been 
making steady 
progress in the 
database 
reorganization. 



The 68K-OS9 database saw [he most 
action, with so many uploads I can't de- 
scribe them all! Mark Griffith released a 
skeleton program tor writing C programs 
for use with MM/1 windowing systems. 
Don't start writing your new OS-9/68000 
application without looking at this example. 
Brian Wright (lXJLlfcR^ELST) uploaded the 
latest version of the GNU C compiler. This 
compiler requires a lot of memory to run, 
and may not run fast, but it creates tight, 
optimized machine code, Greg Law 
(GREGL) spent a weekend uploading the 
entire TOP archives. TO.I 3 stands for The 
OS-9 Project, and is the name assumed by 
a group of people in Germany who write 
and release a lot of useful public domain 
utilities. 



PRICES SLASHED ON ALL 

ADOS PRODUCTS 

LIMITED TIME ONLY! 

EXTENDED ADOS-3 SM.95 

(Requires aD0S-3j 

D-ira rejJ-nnw dKft d-.mci S& 

Artjpir tor CflnlrgJiefs lickmQ Efl-pn ROM 3M*ff:. S'lQ. 

ADOS-3 , . $24,95 




SUPPORT FOR 

OSK/OS9! 

Featuring software from: 

•IMS- 

• Sub-Etha • 

* Bob van der Peel * 

• Public Domain OSK/059 * 

•More Coming!* 

Send long SASE for PD list 
(state OSK or OS9) 




TETRIX 

Paling bkxA puzzle for 1 -3 players. 32K DECB 

PYRAN1M 

Speed S Siraflwyl 
Based on CNnesa game otNM 32X DECS 

CUCKOO 

Teach ywngflnw how 1& read a dock face. KK DEC B 

KID-DRAW 

Colaiiul text & graphics. 
Simple enough sm pra-schcol. 32K DECS 

DISK JOCKEY 

Ta-na jrour dsks! Fealufss W* manager, torn Hie names, 
nclepad and c&ulalar. 128^1 2K [J£CB 

$19.95 eatfi, all four for S39.O0! 
{$2 S&H. CT residents add 6% tax) 

The Gibralter Software Co. 

65 Bluff Avenue 
Rowayton, CT 06853 


MSWI Th* CMs Family I.wfJw 

Gereatogy dala system. Prim A store all racordsl Reaiir&s 

c-we S t, 80 column monitor. 12BK DECS - $24.95 

KESF-JXAKt GeiBta Leo^w. Dmibte entry 

smell business system. 32K OECB - $24.95 

ACCOUNTS RECEIVABLE for abme - add $10 

BOB S MACK CrapMa Mathine 

Create basic graphics lor your programs wilh 

ajors&SiMKDECB -$19.85 

OMEGA HLM Databat* Up to < s fete. 2% 

ttar. Menu drven! SK DECB - 524.95 

FAUNA System* 

904 2nd' Ave.. War™ Robins, GA 3ID9S-!D29 
91 2-329.7959 • Add It. SO 54 H (GA add 5* In) 


SMARTWATCH REAL-TIME CLOCK ..$29-95 

UuHt Ml CWiirrttT*. tvHF Jftpr HQW 5M*e1 OF tn P£hV GD» 
£10. -ncutws OS'S twm IHJr-wr En ADOS 3 r#N*T S5 *ritt 
cfltti S'QsepflrflMiy 

ADOS FOR CoCo 1 and 2 $14.95 

— *< I ADDS Afll^iH* ix siU ui rtsk ATh £Mif 131 ring uttpH l" 1 *! 
gm^ratfl an fPHCiMatt* tW-Biy li't Inlsrmju-on rl pray rfcr *av 
™ns d» WWJ*A bL'itad by in ; •& J1& 

- Su*; 4K,i uii'te" Mr. aru: i^hrtra r Ji.l,- ■=.M':an: DttA* I9H 
Ra-rlKrWi i.j^i 3&fr 0^ rea.Mti 1&i VQCuti fltMr WKrS 

/irr J — niHW **d*HOr 

SPEcmosv_sjEMS^fc5=- El**™, 




VEDfOSK - $39.95 
CheckBook/OSK- $29.95 




Would yov like your ad 

here? Vory roamonaMo 

rafesf €hoo*m HtU *lz», 

abovo, or at loft. Call or 

wrltofJUOUk 

(Kalnbow approved!) 




Bfackhawk Enterprises 

P.O. Box 10552 
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Finally, in ihe OS-9 S1G„ Rick Ulland 
(RICKULAKD) contributed an OS-9 chfiat 
sheet that contains error numbers, colors, 
patterns, and other useful in formation. 
Check it out! 

In tl* CoCo SIG, Allen Huffman (SUBE- 
TllA) released his report on the Atlanta 
CoCoFcst. Francis Sivvgert's (DSRTFOX) 
upload, HARDCTir . ARC T ifc a group of utilities 
donated by the Hardin County Color Com- 
piler Club in Kentucky. Francis also re- 
leased a genealogy database demo for the 
CoCo Family Recorder, If you need to 
create a calendar for a mont h frum any year 
between 1 753 and 2052 t you'll want to use 
Andrew Jackson's (AJACK) W Century 
Calendar Editor. Frances Cakrafl (FRAN- 
CALCRAFT) released a new version of his 



512K CoCo 3 monitor program; this ver- 
sion allows you to generate a hardcopy of 
the information being displayed, 

Peter Cooper (RAINDROP) uploaded a 
dot-to-dot strategy game. In the Music & 
Sound daiabase, Joe Sannacci released a 
new version of Chris Bubcock'sPLAYHACS 
program, which plays Mac sound tiles on 
the CoCo, This version supports many new 
features. 



Eddie Kun\ is pursuing a doctorate in 
physics at Rutgers University. He lives in 
Aurora, Illinois, and works as a program- 
mer and researcher at Fermilah. Eddie is 
the OS9 Online database manager; Ms 
username is EDDlEKUNS. 



OS-9 SIG 



General Information 

OSK GFX STANDARD V £.01 

DONVAll. 

Don Valilancoun 
FREE ON-LINE NEN5PAPER 

C_SY STEMS 

John Gajy 
SUMMARY OF MOUSE CHARACTERISTICS 

EDELMAR 

Ed Gnesick 
HEM OSK MAGAZINE- ROUTE 68 BRIDGE 

0_SY STEMS 
John Gazv 
HCk I'C "'..- "CA (HE It" ON ?,: :: ( , 6C 
BNEWHART 

Roben Newhan 

Applications (6809) 

SNAP: DISK EDITOR <V3> 

COMPER 
Glen Hathaway 
ARCHIVE COMPARISON UTILITY VI. 
DSP1CER 

Dave Spicer 
PRINTFORM VI. 3: PRINT FORMATTER 

WOAY 

Jim Martin 
LANDSCAPE?: FRACTAL SCREEN SAVER 

KMTHOMPSON 

Kelly Thompson 
SS: SCREEN SAVER MENU 

KMTHOMPSON 

Kelly Thompson 
KEEP TRACK OF DELPHI TIME! 

KMTHOMPSON 

Kelly Thompson 
POP V4.4 - WINDOWS ON THE FLY 

ANIMAJIK 

Alan Shell ra 
DIVVY: DIVIDE 5CRN INTO 2-4 WINO 

MISHOO 

Mike Shook 
WHEREIS: FIND FILES ON HARDDRIVE 

MEYEIXI! 

Homer Meyer 
YAIP VI, 4: INVENTORY PROGRAM 

RAYMAYEUX 

Raymond Mayciu 
MENU - A SIMPLE 0S9 MEtlU 

HAUCK 

Dan it: I Hauck 
HULTI/VUE COP! 

HAUCK 

Daniel Hauck 
CTEXT COLOR PROCESSOR 

HAUCK 

Daniel Hauck 
CHECKH00K+/0S-9 DEHO 

JOELHEGBERG 

Joel Mathew Hcgbcrg 
OISKCOPY VERSION 2.0 

DKINDBERG 

Darren Kindberg 
AIF 1 ICOH FOR OSTERM 

REVWCP 

Br. Jeremy, C5JW 
HINIBANNERS09 - DEHO 

IOELHEOBERG 

Joel Mathew Hecberg 
INVENTORY TRACKING PROGRAM 

MOIIRT 

Tim Mohr 

Telecom (*BII91 

CUSTOMIZE OSTERM PALETTES 

MOHRT 

Tim Mohr 
OAI - ONLINE ADVENTURE INTERFACE 

R1CKADAMS 

Rick Adams 



RICK ADAMS' UUCP 4.0 
RICKADAMS 

Rick Adams 

Device Drivers 

OSK NAMES ON 0S9 
JIMRM 
Jim Manning 

Patches 

KARA #4: NUDE PICTORE (GIF) 

[JLEWILLIAMS 

Lee Williams 
BIRDS OF PREY (VEF) 

HOWARDC 

Howard Rouse 
HAVE A NAVY DAY! (VEF) 

HAUCK 

Daniel Hauck 
SAMPLE RAYTRACED [MAGES #4 (GIF) 

GRAPHICSPLTB 

Boh Monlowski 
SAMPLE RAYTRACED IMAGES #3 (GIF) 

GRAPHICSPUB 

Bob Monlowski 
SAMPLE RAYTRACED IMAGES #2 (GIF) 

GRAPHICSPUB 

Bob Monlowski 
SAMPLE RAYTRACED IMAGES #1 (GIF) 

GRAFMCSPUB 

Boh Monlowski 
EYEBALLS: RAYTRACED (GIF) 

MlkESTREAN 

Michael SlTVan 
TRBIKE: RAYTRACED (GIF) 

MIKESTREAN 

Michael Sneu 
GUE5T: RAYTRACE (GIF) 

MIKESTREAN 

Michael Strean 
PARROT (GIF) 

MEYE0OI 

Homer Meyer 

Telcom 

ELVIS SOMGS (ONE) 

HOWARDC 

Howard Rouse 
GOLDEN OLDIES II (UME! 

HOWARDC 

Howard Rouse 
GOLDEN OLDIES (UME) 

I IOWA R IX' 

Howard Rouse 
CLARINET POLKA (UME) 

DRDUDE 

Andy DePne 
THE MUSIC BOX (UME) 

DRDUDE 

Andy DePue 
CHOPIN ETUOE (UME) 

DRDUDE 

Andy DePue 
A SPOON FULL OF SUGAR (UME) 

DRDUDE 

Andy DePuo 
ANNE'S THEME (UME) 

DRDUDE 

Andy DePue 
THE ENTERTAINER (UME) 

DRDUDE 

Andy DePue 

Graphics & Musk 

WORLD MAP : PLOT OUT THE MORLD 

HAUCK 

Daniel Hauck 
THE ROOM: GAME DATA (OAI) 

IUVCK 

Daniel Hauck 
MONTY PYTHON SOUND FILES 

DEAN HOLDER 

Dean Holder 



DR. WHO SOUND FILE 
DEAN HOLDER 

Dean Holder 
PLAY V5: PLAY DIGITIZED SOUNDS 

MARKCARLSON 

Mark Carlson 
MELT: DON'T OVERHEAT THAT SCREEN 

DRDUDE 
Andv Del'ue 
CARTOG: WORLD MAP PROGRAM 
RICK MAC 
Richard McNabb 

Programmers [ten 

SIMPLE TCP t FTP UNIX SOURCE 
B(X>IXK)ZER 

Jason L-amhert 
C0C0/0S9 GUI SKELETON 

EMTWO 

Paul M. Fitch, Jr. 
TERMCAP FOR LEVEL II 

MAKKGRJEHTH 

MaTk tiyillilh 

«8K-OS» 

SC V6.16: SPREDSHEET PROGRAM 

KSCALES 

Ken Scales 

MESSAGE OF THE DAY FORMATTER 

BRYANC 

Bryan Clinpman 
SCREENS 0SK2.4 

EMTWO 

PaulM. Pitch. Jr. 
SYSTEM IV SCREEN COLORS 

PAGAN 

Stephen Carville 
SKEL: MM/1 WINDOWS C PROG AID 

MARKGRJFFTTH 

Mark Griffith 
UNZIPr EXTRACT ZIP ARCHIVES -DSK 

EMTWO 

Paul M. Fitch. Jr. 
LOGITECH MOUSE FILTER FOR MM/1 

RANDYKWILSON 

Randy Wilson 
TC70 MEMORY MAP 

FHOGG 

Frank Hogg 
VGIf: C SOURCE TO VGA GIF VIEWER 

WR HAMBLEN 

William Hamblen 
GNU C AND C++ 1.40 

POLTERGEIST 

Brian Wright 
TOP DISK ARCHIVES 

GREOL 

Greg Law 
TOP DISK INOEXES 

GRECL 

Greg Law 
VGA GRAPHIC DEMO FOR SYSTEM IV 

nPIIII.IPSEN 

FJave Philipwen 
ZMODEM FOR OSK 

RANDYKWILSON 

Randy Wilson 
MARK GRIFFITH'S STERM ORIG + MOD 

JOHNREED 

John Wainwrighl 
TONERS OF HANOI - GAME 

DPHILIPSEN 
DavcPhitipscn 
RDUMP-LIKE UTILITY FOR OSK 

JOHNREED 
John Wninwrigtn 
MH/1 BASIC FONT CHANGER 
JOHNREED 

John Wainwright 
FIXF0NT4: FIX FOR FONT J>4 ON MM1 

JOELHEGBERG 

Joe! Mathew Hegbcrg 
OSK_GFX_STANDARDS_II 

DON VAIL 

Don Vaillancoutl 

Tutorials & Education 

C0C0AID: OS-9 CHEAT SHEET 
RICKULAND 
Rick Ulland 



CoCo SIC 



General Inrnrnialion 

C0C0FEST91REPORT.TXT 
SUBETHA 
Allen Huffman 

CoCo i Graphics 
ST. PATRICK'S DAY 
KEYBOAKDMAM 

Aiiihortv Dawson 



MAC TO CM3 VERSION 2.0 

RICK MAC 

Richard McNabb 
CM3 CHRISTMAS BAND FLYERS 

KEYBOARDMAN 

Anthony Dawson 
OISNEY IN CM3 

R1CKMAC 
Richard McNabb 

::,mi iD'J SEE IT 

SANNUCCI 

Joe Sannucci 
SAN FRANCISCO PICS 

ESCHULMAN 

Erich Schuhnan 
COTTAGE 

SANNUCCI 

Joe Sannucci 
BATTLE.GIF 

CDUB 

Carl Gregory 
ERIKA 

BOYNGER 

David Boynton 
CM3-T0-GIF CONVERSIONS 

5TEVEPDX 

Sieve Rtckctts 

Utilities Si Applications 

HARDCTY.ARC 

DSRTFOX 

Francis Swygcrt 
JAPANESE. ARC 

SANNUCCI 

Joe Sannucci 
XMAS IA6EIMAKI R (C3) 

EDCHAMPION 

Emerson Champion 
NON-MULTI PAK ROMHOVER.BAS 

R1CKMAC 

Richard McNabb 
IV CENTURY CALENDAR EDITOR 

AJACK 

Andrew Jackson 
EZ-ARC VI. 2 (EXT-ADOS-3) 

CERCOMPBH.I.V 

Bill Vcrgona 
THE CAPITALIZES 

KARLOS42 

Karl Garrison 
51ZK C0C03 MONITOR WITH HARDCOPY 

FRAN'CALCRAFT 

Frances CalcratT 
RANDOM NUMBERS 

KARI.OS42 

Karl Garrison 
CCFAMREC.OSK 

DSRTFOX 

Francis Swygen 
COLOR CHORDINATOR 

DRILLMASTER 

Johnny WilHsns 
EZ'ARCIVER 

CF.RCOMPBII.LV 

Bill Vergona 
DIVIDE ANY PILE 

KEN) I ALTER 

Ken E Eallcr 
USE YOUR FUNCTION KEYS 

Ki Ml Nl.TL'f 
Ken Hallcr 

Games 

ADSO ALIGNMENT OETERMINER 

KARLOS42 

Karl Garrison 
GANTELET II SCREEN EDITOR 

CPELOS1 

Charlie Pelosi 
D0T2D0T STRATAGY 

RAINDROP 

Peter Cooper 

Music et Snunrt 

SMARTMAC.ARC 

SANNUCCI 

lw Sannucci 
FROMART.ZIP (UNZIPPED) 

BAWILLIAMS 

BobW r illiams 
ADAGIO 

THESCHU 

Brian Schubring 
GHOSTBUSTERS THEME 

KARLOS42 
Karl Oamson 

Produel Reviews & Announcement 

KUDOS EOR EVERSOFT 

THEROOKIE 

Tom Kowalskt 

Telecom munk'atitms 
OB-25 RS-232 PORT GIF 
ESCHULMAN 

Erich Scliulnian 
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DELPHI- The $1 per hour online solution! 



DELPHI'S 20/20 Advantage Plan sets the standard for online value: 
20 hours for only $20, for all the services you want! 

• Thousands of files to download. 

• Chat lines with hundreds of participants 

• Worldwide e-mail. 

• Hobby and computer support groups. 

• Multi-player games. 

• Local access numbers 
in over 600 cities and towns. 



Wal Offer: 5 hours for $5! 

Try DELPHI at $1 per hour. Join today and get 5 hours of evening and weekend 
access for only $5. If you're not satisfied, simply cancel your account before the 
end of the calendar month with no further obligation. Keep your account active 
and you'll automatically be enrolled in the 20/20 plan for the next month. 

1. Via modem, dial 1-800-365-4636. 

2. When connected, press RETURN once or twice. 

3. At Password, enter RB55 

Questions? Call 1-800-695-4005. 

Rates apply for evening and weekend access from within the mainland US. There is a one-time enrollment fee of $19 
when you join the 20/20 Advantage Plan. Further details are provided during the online registration. 





DELPHI is a service of 

General Videotex Corporation 

1030 Massachusetts Avenue 

Cambridge, MA 02 138-5302 

800-695-4005 • 6 1 7-49 1 -3393 
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a&\y 19,200 baud. To change this, poke the 
appropriate value for half the rate at which 
your primer {or parallel interface) expects 
to receive 4ata, 

Finally, ine disk -drive step rati? b set to 
&.X milliseconds in Line ! 0. If you f\nd that 
you get I/O errors vxv&g this step rate* try 
changing the 20 in POKE &HD816,20 to 21 
for 12ms. 22 for 2&ns of 33 for 30ms. 

Nnw lct v s look at some of the tricks you 
can use in your own pro^rams^ When you 
first run the program , you probably noticed 
the letters fortlie Insert Disk prompt falling 
^Csown*' the screen one at a time. This h 
accomplished using a few simple pokes to 
(he 32-<biuma: screfen j^mory (iocaiions 
1024 through 1535, dtcimat) mid a FftlNT 
statement. T^ie code to "drop 11 the message 
is contained in Line 50. 

You may he amused by the unusual 
display of the message RADIUS Gl REC- 
TORY. ThisirlTci'l (£ Created! usin^ addresses 
SFF94 and &FPJS in the til ME chip to 



eoutrol the text bl ink rate. Line i 00 sets thi s 
to the maximum speed, which produces an 
amusing effect, 

Anotficr trick i* that of removing the- 
cursor from the screen. Having a cursor 
appear in front of each letter as it prints 
makes a program took unprofessional and 
tends to slow the program down. Line HO 
takes care of "kitting" the cursor. 

ID is very practical for CoCo users it 
gives you a quick way to get information 
about your disk files, \ hope you find ihe 
tricks useful and that youTl enjoy using the 
program. 



Nfck Jolvt&m is a high-school Jtwi&r 
who has used the C&Co since 1982. After 
purchasing a CoC& 3, Nyrk quickly ad- 
vanced and started his <>wn software com- 
pany, N*Johnson Software, He can be 
contacted at 5830 RcinkeDr^cCusnicw, 
FL 32536. Please include an SASE when 
requesting a reph. 
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The Listing: I D 



1 'ID 

2 'BY MICK JOHNSON 

3 'COPYRIGHT (C) 199? 

4 'BY FALS0FT. INC. 

5 'RAINBOW MAGAZINE 

10 POKE JHD7C»,e:POKESHD816,20 

20 POKE 150.1 

30 VERIFYON 

4B WIDTH 32:PALETTE12.63:PALETTE 

13,0:PRINT"INSERT A DISK AND PRE 

SS [ENTER]." 

50 FOR A-1B24 TO 1B55:M-PEEK(A) : 

FOR B-A+3Z TO 1503 STEP 3?:f>0KEB 

.W:P0KEB-3£.96:IF INKEYt-CHRSU3 

) THEN 70 ELSE NEXTB: NEXTA 

60 FOR 0-1 10 14;PRiNT9480:fORI- 



1T03:NEXTI:NEXTO:GOTO 50 

70 PALETTE12.0:PALETTE13.18:CLEA 

R 4096 

80 ONBRKGOTOB0:POKESHF77E.33:POK 

ESHF798,33:POKESHF850,33:POKE&HF 

89D.33:P0KE4HF91C.33:POKESHF812, 

33:P0KEiHF7ED,33 

90 POKE .HE04?,B 

108 POKE SHFF94.0:POKE5KFF95.1 

110 POKE 65497.0 

120 POKE SHE045,19:POKEiHE047.0 

130 WIDTH 80 

1*0 PALETTE0.0:PALETTE8,63:ATTR0 

.0:CLS 

1S0 DIM FJ(68):DIMEJ(68):D1MT(68 

):DIMA(68):DIMG(68J:I)]M1(68) 



160 ON BRK GOTO 160 

170 ON ERR GOTO 1590 

180 G0SUB 720 

190 CLS 

200 ATTR0.0 

210 PA1_ETTE0.0:PALETTE8,63 

220 CLS 

230 LOCATE 34,0:ATTR4,4,B:PRIN1" 

10 .BAS-;:ATTR0.0 

240 LOCATE 32 . 1 :ATTR0,0. B.U : PRIN 

I"BY NICK JOHNSON. ";:ATTR0,0 

2b0 L0CATE12.23:ATTR 0.0.U:PR1NT 

"bSL ARROW KEYS TO POSIT I0« AND 

ENTER 10 MAKE SELECTION ."; :ATTR0 

.0:LOCATE0.0 

260 LOCATE 70.2:ATTR4.4:PR[NT"[B 

REAK]:": LOCATE 70.3:PR1NT" RE-RE 

AD":LOCATE70.4:PRINT" 01 R ":L 

OCATE70.6:PRINT" [0] OUIT ";:ATT 

R0,0 

270 H-0;V-2 

280 FOR 1-1 TO 01 

290 LOCATE H,«:PRINT Ft(I)"."EI( 

I): 

300 V-V+l: IF V-23 THEN V-?:M-H+1 

'■ 

310 NEXT I 

320 HF-1:D-0:B-0:GOSUB1130 

330 G0SUB 1220 

340 0-1 :G0SUB 1130 

350 IF UA-1 THEN HF-HF-1:IF HF<1 

THEN HF-1 
360 IF LA-1 THEN HF-HF-J1:IF KF< 
1 THEN HF-HF+21 

3?0 IF RA-1 THEN HF-HF+21: IF HF> 
Q-l THEN HF-HF-21 
380 IF DA-1 THEN HF-HF+1:IF HF>Q 

1 IHEN HI— 0-1 
390 IF E-l THEN G0SUB 1790:GOTO4 
20 

400 3-0:D-0:GOSUB 1130 
410 G0S0B 1220:D-1:GOSUB1130:GOT 
350 

420 B-1:D-0:GOSUB 1130 
430 FOR X-64 TO STEP- 16 : PALETT 
E8,X:F0R Y-l TO 100:NEXTY:NEXTX 
440 LOCATE 0.2:PRINT: LOCATE0 ,2 :A 
TTR 4.4.8:PRINT"0P£NING ";:ATTR4 
.4.U:PRINTFS(HF)"."Et(HF);:ATTR4 
.4 
450 POKE66496.0:OPEN"D".i)l.Fl(HF 



l+"."+Ef[HF)+"".l 
460 B-LOF(l) 
470 CLOSE 
480 POKE65497.0 

490 PRINT 

500 INPUT-ECHO OUTPUT TO PRINTER 

";Qt:IF Q*-"Y" THEN POKE 360,162 

:P0KE 361.191 ELSE POKE 360.SHCC 

:PQKE361.«H1C 

510 LOCATE0,2:PRINT -The file ": 

;ATTR4.4.U:PRINTFI(HF)"."EHHF); 

:ATTR4.4:PRINT" cont4(ns"B"bjtes 

520 PRINT-and occupies'NtHF)"gra 
nules of disk space. ":PRINT"Ther 
e are"(N(HF)*2304)-B"wasted byte 
s 1n these granules." 
530 PRINT-This is a<n> ": 
540 IF T(HF)-0 THEtt PRINT"BASIC 
"; ELSE IF T(HF)-1 THEN PRINT"AS 
CI1 ": ELSE IF T(HF)-2 THEN PRIN 
T"Hachine Language ": ELSE IF T{ 
HF)-3 THEN PRINT"Asm. Source Cod 
e ": ELSE PRINT"unKno«n "; 
560 PRINf'f ile." 
560 PRINT"Il is In ": 
570 IF A(HFl-255 THEN PRINT'ASCI 
I "; ELSE PRINT"BINARY "; 
530 PRINT"fonnat." 
690 iF I(HF)-2 THEN G0SUB 1330 
600 POKE 360,&HCC:POKE361.1H1C 
610 LINE INPUT-Mould you like to 
see the file dala7":0i 

620 IF QI--Y" THEN 630 ELSE 700 

630 1NPUT"ECH0 FILE DATA TO PRIN 

TER":0*:IF 0*-"Y- THEN POKE 360. 

16?:P0KE361.191 

640 POKE65496.0:OPEN"I" Jl.Ff(HF 

)+".*+E*(HF) 

650 IF £0F(1) THEN 660 ELSE INPU 

T#1.A(:PRINTAI;:G0T0 650 

660 CLOSE*! 

670 POKE65497.0 

680 IF lNKEYS-"" THEN 680 

690 PRINT 

700 POKE 360.iHCC;POKE361.&HlC:B 

OTO 190 

710 GOTO710 

720 ' READ DIRECTORY 

730 AHR0,0;PALtTTE8.63:CL5:LOCA 

TE40-9,12:ATTR4.4,B:PRINT"REAOIN 
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Optimize Utility S&t 1: Optimize your disks by eliminating fragmented files 
and compacting your directories for faster file access. Running time averages one 
hour. Also Includes a utility to assess Ale fragmentation and directory fragmenta- 
tion as well as excess directory padding. Can work in conjunction with Burke & 
Burke's repack utility. Look for upcoming review In Rainbow. 829.9 A; Foreign 
Postage, add $3.00 

Optimize Utility S&t 2*. Contains two programs to t:heck the Integrity of your 
disks. Detect and correct any directory or flJe structure errors. Run perlodlcalry 
and before any optimizations to Insure the reliability of your data. Look for upcom- 
ing review in Rainbow. $19.95; Foreign Portage, add $3.00 

Optimize Utility Set Pact Combination of both optimize sets. Purchasers of 
the Optirr&ne UtilUy Set I can upgrade for $9.95 with proof of purchase. $39,95: 
Foreign Postage, add S4.00 



NintS 1 IrtlCSr Each issue contains: 9 helpful and useful programs to help build 
your OS-9 library ■ Instructions, examples, and samples of BaslcQ-g procedures 
and subroutines to help with your own programs and your under?il finding at 
BasicOg * C programs and programming examples > Hints, Help columns, and 
tnforniative articles to advance your knowledge of OS-9 • Supplied totally of 5.25" 
dEsk * Hound manual -sent to each new subscriber for help in getting Nine-Times 
up and running, as well as tips on using it with a ram disk or hard disk * All 
graphic/joystick interface for ease of use. One Yemx Subscription, $34.95; 
Canadian Postage, add 81 -DO; Foreign Postage, add SS.OO 

Back Issues: Available for the May 19&9 through Woueniber 1991 issues. Please 
write for information on Back Issue contents. $7*00 each; Foreign Pottage, add 
$2*00 each 

Magazine Source: Hue to many inquiries, the source code for the magazine 
graphic presentation shell Is being provided as an Informational tool. Included js 
the actual Baslc09 source code and compiled modules on disk, as well as docu- 
mentation and a printed copy of the source code. 325.95; Foreign Postage, add 
S&.OO 



■:j1 Asslskimc & In 
12 16) -758-7694 
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JWT Enterprises 

5755 Lockwood Blvd. 
Youngstown, OH 445 12 

Sorry, no C.O.D.'a ar crrdU cauls: Foreign & Canadian ordcra. please use U.S. mono; anteim. 

U.S. checks, allow 6-8 weeks for receipt of first issue/back issue. 
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a&\y 19,200 baud. To change this, poke the 
appropriate value for half the rate at which 
your primer {or parallel interface) expects 
to receive 4ata, 

Finally, ine disk -drive step rati? b set to 
&.X milliseconds in Line ! 0. If you f\nd that 
you get I/O errors vxv&g this step rate* try 
changing the 20 in POKE &HD816,20 to 21 
for 12ms. 22 for 2&ns of 33 for 30ms. 

Nnw lct v s look at some of the tricks you 
can use in your own pro^rams^ When you 
first run the program , you probably noticed 
the letters fortlie Insert Disk prompt falling 
^Csown*' the screen one at a time. This h 
accomplished using a few simple pokes to 
(he 32-<biuma: screfen j^mory (iocaiions 
1024 through 1535, dtcimat) mid a FftlNT 
statement. T^ie code to "drop 11 the message 
is contained in Line 50. 

You may he amused by the unusual 
display of the message RADIUS Gl REC- 
TORY. ThisirlTci'l (£ Created! usin^ addresses 
SFF94 and &FPJS in the til ME chip to 



eoutrol the text bl ink rate. Line i 00 sets thi s 
to the maximum speed, which produces an 
amusing effect, 

Anotficr trick i* that of removing the- 
cursor from the screen. Having a cursor 
appear in front of each letter as it prints 
makes a program took unprofessional and 
tends to slow the program down. Line HO 
takes care of "kitting" the cursor. 

ID is very practical for CoCo users it 
gives you a quick way to get information 
about your disk files, \ hope you find ihe 
tricks useful and that youTl enjoy using the 
program. 



Nfck Jolvt&m is a high-school Jtwi&r 
who has used the C&Co since 1982. After 
purchasing a CoC& 3, Nyrk quickly ad- 
vanced and started his <>wn software com- 
pany, N*Johnson Software, He can be 
contacted at 5830 RcinkeDr^cCusnicw, 
FL 32536. Please include an SASE when 
requesting a reph. 
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The Listing: I D 



1 'ID 

2 'BY MICK JOHNSON 

3 'COPYRIGHT (C) 199? 

4 'BY FALS0FT. INC. 

5 'RAINBOW MAGAZINE 

10 POKE JHD7C»,e:POKESHD816,20 

20 POKE 150.1 

30 VERIFYON 

4B WIDTH 32:PALETTE12.63:PALETTE 

13,0:PRINT"INSERT A DISK AND PRE 

SS [ENTER]." 

50 FOR A-1B24 TO 1B55:M-PEEK(A) : 

FOR B-A+3Z TO 1503 STEP 3?:f>0KEB 

.W:P0KEB-3£.96:IF INKEYt-CHRSU3 

) THEN 70 ELSE NEXTB: NEXTA 

60 FOR 0-1 10 14;PRiNT9480:fORI- 



1T03:NEXTI:NEXTO:GOTO 50 

70 PALETTE12.0:PALETTE13.18:CLEA 

R 4096 

80 ONBRKGOTOB0:POKESHF77E.33:POK 

ESHF798,33:POKESHF850,33:POKE&HF 

89D.33:P0KE4HF91C.33:POKESHF812, 

33:P0KEiHF7ED,33 

90 POKE .HE04?,B 

108 POKE SHFF94.0:POKE5KFF95.1 

110 POKE 65497.0 

120 POKE SHE045,19:POKEiHE047.0 

130 WIDTH 80 

1*0 PALETTE0.0:PALETTE8,63:ATTR0 

.0:CLS 

1S0 DIM FJ(68):DIMEJ(68):D1MT(68 

):DIMA(68):DIMG(68J:I)]M1(68) 



160 ON BRK GOTO 160 

170 ON ERR GOTO 1590 

180 G0SUB 720 

190 CLS 

200 ATTR0.0 

210 PA1_ETTE0.0:PALETTE8,63 

220 CLS 

230 LOCATE 34,0:ATTR4,4,B:PRIN1" 

10 .BAS-;:ATTR0.0 

240 LOCATE 32 . 1 :ATTR0,0. B.U : PRIN 

I"BY NICK JOHNSON. ";:ATTR0,0 

2b0 L0CATE12.23:ATTR 0.0.U:PR1NT 

"bSL ARROW KEYS TO POSIT I0« AND 

ENTER 10 MAKE SELECTION ."; :ATTR0 

.0:LOCATE0.0 

260 LOCATE 70.2:ATTR4.4:PR[NT"[B 

REAK]:": LOCATE 70.3:PR1NT" RE-RE 

AD":LOCATE70.4:PRINT" 01 R ":L 

OCATE70.6:PRINT" [0] OUIT ";:ATT 

R0,0 

270 H-0;V-2 

280 FOR 1-1 TO 01 

290 LOCATE H,«:PRINT Ft(I)"."EI( 

I): 

300 V-V+l: IF V-23 THEN V-?:M-H+1 

'■ 

310 NEXT I 

320 HF-1:D-0:B-0:GOSUB1130 

330 G0SUB 1220 

340 0-1 :G0SUB 1130 

350 IF UA-1 THEN HF-HF-1:IF HF<1 

THEN HF-1 
360 IF LA-1 THEN HF-HF-J1:IF KF< 
1 THEN HF-HF+21 

3?0 IF RA-1 THEN HF-HF+21: IF HF> 
Q-l THEN HF-HF-21 
380 IF DA-1 THEN HF-HF+1:IF HF>Q 

1 IHEN HI— 0-1 
390 IF E-l THEN G0SUB 1790:GOTO4 
20 

400 3-0:D-0:GOSUB 1130 
410 G0S0B 1220:D-1:GOSUB1130:GOT 
350 

420 B-1:D-0:GOSUB 1130 
430 FOR X-64 TO STEP- 16 : PALETT 
E8,X:F0R Y-l TO 100:NEXTY:NEXTX 
440 LOCATE 0.2:PRINT: LOCATE0 ,2 :A 
TTR 4.4.8:PRINT"0P£NING ";:ATTR4 
.4.U:PRINTFS(HF)"."Et(HF);:ATTR4 
.4 
450 POKE66496.0:OPEN"D".i)l.Fl(HF 



l+"."+Ef[HF)+"".l 
460 B-LOF(l) 
470 CLOSE 
480 POKE65497.0 

490 PRINT 

500 INPUT-ECHO OUTPUT TO PRINTER 

";Qt:IF Q*-"Y" THEN POKE 360,162 

:P0KE 361.191 ELSE POKE 360.SHCC 

:PQKE361.«H1C 

510 LOCATE0,2:PRINT -The file ": 

;ATTR4.4.U:PRINTFI(HF)"."EHHF); 

:ATTR4.4:PRINT" cont4(ns"B"bjtes 

520 PRINT-and occupies'NtHF)"gra 
nules of disk space. ":PRINT"Ther 
e are"(N(HF)*2304)-B"wasted byte 
s 1n these granules." 
530 PRINT-This is a<n> ": 
540 IF T(HF)-0 THEtt PRINT"BASIC 
"; ELSE IF T(HF)-1 THEN PRINT"AS 
CI1 ": ELSE IF T(HF)-2 THEN PRIN 
T"Hachine Language ": ELSE IF T{ 
HF)-3 THEN PRINT"Asm. Source Cod 
e ": ELSE PRINT"unKno«n "; 
560 PRINf'f ile." 
560 PRINT"Il is In ": 
570 IF A(HFl-255 THEN PRINT'ASCI 
I "; ELSE PRINT"BINARY "; 
530 PRINT"fonnat." 
690 iF I(HF)-2 THEN G0SUB 1330 
600 POKE 360,&HCC:POKE361.1H1C 
610 LINE INPUT-Mould you like to 
see the file dala7":0i 

620 IF QI--Y" THEN 630 ELSE 700 

630 1NPUT"ECH0 FILE DATA TO PRIN 

TER":0*:IF 0*-"Y- THEN POKE 360. 

16?:P0KE361.191 

640 POKE65496.0:OPEN"I" Jl.Ff(HF 

)+".*+E*(HF) 

650 IF £0F(1) THEN 660 ELSE INPU 

T#1.A(:PRINTAI;:G0T0 650 

660 CLOSE*! 

670 POKE65497.0 

680 IF lNKEYS-"" THEN 680 

690 PRINT 

700 POKE 360.iHCC;POKE361.&HlC:B 

OTO 190 

710 GOTO710 

720 ' READ DIRECTORY 

730 AHR0,0;PALtTTE8.63:CL5:LOCA 

TE40-9,12:ATTR4.4,B:PRINT"REAOIN 



JWT Enterprises 



Optimize Utility S&t 1: Optimize your disks by eliminating fragmented files 
and compacting your directories for faster file access. Running time averages one 
hour. Also Includes a utility to assess Ale fragmentation and directory fragmenta- 
tion as well as excess directory padding. Can work in conjunction with Burke & 
Burke's repack utility. Look for upcoming review In Rainbow. 829.9 A; Foreign 
Postage, add $3.00 

Optimize Utility S&t 2*. Contains two programs to t:heck the Integrity of your 
disks. Detect and correct any directory or flJe structure errors. Run perlodlcalry 
and before any optimizations to Insure the reliability of your data. Look for upcom- 
ing review in Rainbow. $19.95; Foreign Portage, add $3.00 

Optimize Utility Set Pact Combination of both optimize sets. Purchasers of 
the Optirr&ne UtilUy Set I can upgrade for $9.95 with proof of purchase. $39,95: 
Foreign Postage, add S4.00 



NintS 1 IrtlCSr Each issue contains: 9 helpful and useful programs to help build 
your OS-9 library ■ Instructions, examples, and samples of BaslcQ-g procedures 
and subroutines to help with your own programs and your under?il finding at 
BasicOg * C programs and programming examples > Hints, Help columns, and 
tnforniative articles to advance your knowledge of OS-9 • Supplied totally of 5.25" 
dEsk * Hound manual -sent to each new subscriber for help in getting Nine-Times 
up and running, as well as tips on using it with a ram disk or hard disk * All 
graphic/joystick interface for ease of use. One Yemx Subscription, $34.95; 
Canadian Postage, add 81 -DO; Foreign Postage, add SS.OO 

Back Issues: Available for the May 19&9 through Woueniber 1991 issues. Please 
write for information on Back Issue contents. $7*00 each; Foreign Pottage, add 
$2*00 each 

Magazine Source: Hue to many inquiries, the source code for the magazine 
graphic presentation shell Is being provided as an Informational tool. Included js 
the actual Baslc09 source code and compiled modules on disk, as well as docu- 
mentation and a printed copy of the source code. 325.95; Foreign Postage, add 
S&.OO 
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JWT Enterprises 

5755 Lockwood Blvd. 
Youngstown, OH 445 12 

Sorry, no C.O.D.'a ar crrdU cauls: Foreign & Canadian ordcra. please use U.S. mono; anteim. 

U.S. checks, allow 6-8 weeks for receipt of first issue/back issue. 
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THE RAINBOW 



G DIRECTORY"; :ATTRB,0 

740 LOCATE 48,13 

750 C-1:C-1 

760 UNLOAD 

770 FOR 1-3 TO 11 

78B PR1NTCHRJU28+1-3>::LOCATE40 

.13 

790 P0KE65496.B 

800 DSK!tB,17.I,Ai,as 

810 POKE 65497,0 

820 A$-A*+LEFT$(6J.127) 

830 F$-M[0>[A*.C3!) 

840 IF ASC(Ft)-0 THEN 940 

850 IF A$ClFf)-255 THEN 970 

860 FS(Q)-F* 

870 EI(0)-MI0J(F(,9.3) 

860 T(Q)-ASC(M1D»<F$.12.1)> 

890 A{Q)-ASC<MIDJ(FJ, 13,1)1 

1W G(0.)-ASC<M!D$<F$.1«.1)> 

910 FKQ)-LEFTt(Ft.a) 

920 0-0+1 

930 IF 0>6S THEM 970 

940 C-C+3? 

950 IF C>255 THEN C-1:IF I»-ll T 

HEN 970 ELSE NEXT I 

960 GOTO 830 

970 'READ GRANULE TABLE 

980 DSKIS0,17.2.Cf .D! 

?90 POKE 65497,0 

."000 Ct-LEFTHCt.68) 

.010 'ANU MATCH GRANULES WITH H 

LES 

1020 FOR 1-1 TO 0-1 

1030 NUI-0 

1040 LOCATE 39.13:PR1MT CHRtfI+3 

2): 

I860 N-G(I) 

1060 IF N>68 THEN ATTR 4.4.8.U:L 

0CATE34.il :PRINT"GRANULE ERROR!" 

::ATTR0,B:'-OCATE41.13:GOTO 1110 

1070 N-ASC(MlDt(C$.N+l,l)) 

1080 N(I)-N[|HI 

1090 PRINTCHR*((N(I)+32))::L0CAT 

F39.13 

i ik« n N< <il I ii N .;■.-,■ 



1110 MEXT I 

1120 RETURN 

1130 - HIGHLIGHT A FILE 

1140 IF HF<?2 THEN H-0:V-HF EL5E 

IF HF>21 AND HF<43 THEM H-14;V- 
HF-21 ELSE IF HF>4Z AND HF<64 TK 
EN H-28:V-HF-42 ELSE H-42:Y-HF-6 
3 

1150 V-V+l 
1160 LOCATE H . V 
1170 IF B-l THEN ATTR4 . 4 , B: PRINT 

Fl<HF)"."E$[HF):sATTR0.BiGOTC 1 

:w 

1180 IF D-fl THEN ATTR4.4:PRINT F 
t(HF)"."EKHF);:ATTR0,0 ELSE ATT 
R 0.0:PRIHT Ftf HF)" . "Et(HF) : 
1190 RETURN 
1200 TIMER-0 

1210 IF T[MER>-4 THEN RETURN EL5 
E 1210 

1220 'READ KEYS 
1230 UA-0:DA-0:LA-0:RA-0:F-O 
1Z40 XI-INKEYt 

1250 IF [NKEY(-CHR((13) THEN E-l 
:GOTO13Z0 

1260 IF PEEK(339)-251 THEN WIDTH 
32;P0KE65496.B:CHP:ST0P 
1Z70 IF PEEK(341)-Z47 THEN UA-1 
1280 IF PEEK(342)-247 THEN DA-1 
1290 IF PEEK(343)-Z47 THEN LA-1 
1300 IF PEEK<344)-247 THEN RA-1 
1310 IF UA-0 ANO DA-0 AND LA-0 A 
l)D RA-0 THEN 1Z53 
13Z0 RETURN 
1330 ON ERR GOTO 15S0 
1340 POKE65497,0:PRINT"START. EN 
D ":POKE65496.0 

1350 OPEN"D" Jl.Ft(HF)+"."+EKHF 
).l 

1360 B-l 

1370 GET#l,B+l:INPUT#l.Llt:GET#l 
,FJ+2:INPUTfl,L2t 

i380 GET#1.e+3:INPUT#1.All:StT#1 
.9+4:INPUT#l,A2l 
1390 IF LI*-"" THEN Llf-CiiRKB) 



ELSE IF L2J-"" THEN L2J-CHRM0) 

1400 IF Alt-"" THEN AU-CHRt(B) 

ELSE IF A2$-"" THEN A2t-CHR((B) 

1410 S-ASCtAlt)*256+ASCfA2*l 

1420 £-S+ASC(Llf)*256+ASC(L2t)-l 

1430 POKE 65497,0 

1440 PRINTUSING-X % % S":HEX 

t(S).HEXS(E) 

1450 POKE65496.0 

1460 B-B+ASC<L1i)*256+ASCU2$)+S 

1470 SET#1.B:INPUT#1.BH 

1480 IF Bit-"" THEN B1J-CHRK0) 

1490 IF ASC(Bl!)-255 THEN 1500 E 

LSE 1370 

1500 GEr#l.B+3:INPUT#l.El$:GET#l 

,B+4:1NPUT#1.E2( 

1510 IF Elt-"" THEN E1J-CHRK0) 

ELSE IF E2S-"" THEM E2$-CHRJC0) 

1520 POKE65497.0 

153B PRIMT"EXEC-"HEX$(ASCCE1$>*2 

56+ASC(E2t>) 

1540 POKE 65496.0 

1650 CLOSE 

1560 POKE65497.0 

1570 ON ERR GOTO 1590:RETURN 

1580 POKE65497.0:POKE111.B:PRINT 

"FILE STRUCTURE ERR0K!":P0KE6549 

6,0:CLOSE:GOTO 1610 

1590 PRINT:POKEin.fl:PRINT"AN ER 

ROR HAS BEEN ENCOUNTERED WHILE P 

ROCESSING FILE DATA." 

1600 CLOSE 

1610 IF Q<20 THEN PRIMTERNO.ERLI 

N 

1620 !F ERNO-20 THFN PRINT"WO E 

RROR, TYPE ";:GOTO 163B ELSE 171 



1630 Q-PEfcCt&HFO) 

1640 IF AND 128 THEM PRINT"DRI 

VE NOT READY," 

1650 IF Q AND 64 THEN PRINT"DISK 

IS WRITE PROTECTED" 
1660 IF d AND 32 IHFN PSINT"READ 

OR WRITE ERROR" 
1670 IF AND 16 THEN PRINT"ACK! 



Feature Pribram 



Add Pizazz to Title Screens 



Many program title screens are pretty 
boring ; some programs don ' t even use 
title screens. Adding title screens to our 
creations gives us a chance to show off a 
little, so I say we should make them as 
snazzy as possible! The short program 
presented here should give you a few ideas. 
It uses text styies that I have drawn with 
DRAW statements, but the entire fonts are not 
included. Experiment with Title Semens 
and learn to develop your personal mar- 
quees. The program runs as a stand-alone, 
but you could easily incorporate such a 
routine for your own title screen. 

When you rim T I TL E5. the 6r« two title- 
screen lilies are displayed. The program 
then uses a G£T statement (Line 40) to get 
the first row on the graphics screen. [TITLES 
is designed for the PMG0E4 screen, hut the 
techniq tie s used are a ppl i cable to any CoCo 
graphics screen,) After the computer gets 



the fi rst row, it P U Ts it back but uses the N T 
suffix to reverse the colors. The FOR/NEXT 
loop continues this process until the re- 
mainder of the main portion is reversed. 
Then the last line of text is displayed. 

Control would be passed to your appli- 
cation by removing the RUM command from 
Line 60. Line 70 pauses the computer, then 
your program would pick up at Line SO. 1 
hope you enjoy this little bit of personality 
and that you find a way to incorporate your 
own into your programming efforts. 



BUI Bernico is the author of over 200 
Co far Computer programs and is a frequent 
rainbow contributor whose hobbies include 
golf, writing music and programming . Bill 
is a drummer in a rock hand and lives in 
Sheboygan . Wisconsin . 



16K Extended 



> 



40 GET<0.0)-<255.1),V:FORC-BTO]2 

5:PUT(0.C)-(255,C),V.NOT:EXEC433 

45:NEXT:DRAW"54BM90.170UERD9NL2E 

U8R4D5ML3EU3BUBR3":GOSUB70:ORAW" 

BD4ED6RELU5FERBR2BU3":GOSOB70:Et 

-"B0BU4EN06R4DG4FR2E2BR2BU7":DRA 

ME(:G0S0B70;S(-"BD6UER3NFL3D3R30 

3L3HBR5UBU7BR2": DRAWS! 

50 GOSOB70:DRAWE*:GOSUB70:DRAITB 

D4ED6RU6D3£3RD6RNE2U6BU3BR4":G0S 

UB70:DRAW"BD3ED7R2NE2LU7FRBR3BU3 

":GOSUB70:DRAWSt+"BR;":GOSUB70:P 

Dt-"B37DR0LBU78R6":DRAWPO$+PDt+P 

Et) 

60 EXEC44539:RUN 

70 rORX-lTO100:NEXT:EKEC43346:RE 

TORN 



The Listing: TITLES 

1 'TITLE SCREENS 

2 'BY BILL BERN1C0 

3 'COPYRIGHT (C) 1992 

4 'BY FAIS0FT. IMC. 
• ' ■:■'■ ',MW MAGA7JNF 

10 PMODE4,l:PCLSl:SCREENI,l:C0L0 

R0 . 1 : OIHVU00. 1.1): DRAM-BMB . 60S2 

0BR2NR5H10R5FD3BL2L2U2R2D2BR2GFB 

L2L2D2R2O2BR2D3GBRS16BR2NR6O10R6 

B2L4D2R2D2L202R4D2BR8L2U2H2D4L2U 

10R6FDBL2D2L2U2R2BR2D2GL2F3D2BR? 

U10R2M+5.7U7R2D10L2M-5.-7O7L2BRi 

1U10R2D1OL2BR9L4HOB 

20 0RAWFR4I DPI 2UI ?D6R2UK2[)?;;HKH 



L4HU8ER4rDBL2D6L?06R2BR2D7GS4BMl 

8.65R220DL220DR220aL220" : POKE 1 7S 

.2:PAINT(?0, 58).. 0:PA[NTf 65.581. 

,0:PA[NKl]0,be).,0:PA!NH125.!i8 

1, .0:PAIHTU68.58)..0:PA!NI(]f!4. 

5e),,0:PAINT[20,66). ,0:PAINT(220 

,581.,B:POKE17S,0 

30 DRAWBM61.89SBDL3GBL2BDFR3BD3 

L3NHR4E02HB03BR8BOLGD3BGFR4EU5H8 

R5BD7RU3R3UDL3BU2UR5UBR4BDRBR2D6 

NL06R3OBR6D6BD2NLE2BO2F?BD?BRR07 

BR3BD7RU2R2BH2EBD2BRF205N1BU7BR4 

BD7R03NRBU20R2BEBRFDG2F2DLB07BR5 

BD7R6UDI bBU?UR4UDL4BU?UR5U 




RECORD NOT FOUND!" 
1680 IF AND 8 THEN PRINT"CYCLI 
C REDUNDANCY CHECK ERROR" 
1690 IF Q AND 4 THEN PRINT"LDST 
0ATA" 

1700 GOTO 1760 
1710 IF ERNO-23 THEN PRINT"FILE 

NOT CLOSED PR0PERLV OR FILE STR 
UCTURE BAD." 

1720 IF ERNO-26 THEN 1760 
1730 IF ERNO-27 OR ERNO-32 OR ER 
NO-37 THEN PRIMT"FILE STROCTORE 
BAD!" 

1740 IF ERNO-36 THEN PR1NT"VERIF 
ICATION ERROR. DISK MAY BE BAD." 
1760 GOSUB 1790:GOSUB1790 
1760 IF INKEYt-"" THEN1760 
1770 POKE 360.&HCC:POKE36L,SH1C 
1780 GOTO 180 

1790 PLAY"L12804V31CY29C\I27CV?5C 
V23CV21CV19CV17CV16CV13CV11CV9CV 
7CV5CV3CV1C" 
1800 RETURN 
1810 PR]NTPEEKC339>:G0TO 1810 



Product Review 



DIR: Help for Disk 
Directories 



f.Xhl is a BASIC, menu -driven program 
ftTitten for theCoCo 3 with a disk drive. 
The program supplements Bfd> {ftiuary 
Rdiior DisKl, which wa^ reviewed in the 

April 9\ ISSU* of THRRAIMIOW. AhhiHtgh 

it WiMks with^£D t you diin T Lh;tve H' hitve 
BED in order to use some of U//Ts handy 
features. 

Bxecu ting OfK is as s i m pie as entering 
RUN "DIR". Oitcc Off? i s up niid runn i ng h 
■iidisplays in a40-column format the File- 
names for ail programs 033 a disk in your 
drive. Each file on the disk has a corre- 
spond ing nti mber in front of the filena me. 
This number can be used to run the par- 
ticular application. Across the bottom of 
die screen are letters for rhc following 
eoimrn&nd <jptioas: 

R — load s and runs a B ASIC or machiiie- 

language program 

Q — quits DIR 

Y — yanks akilted directory file 

D displays the disk directory 

P — semis « directory 10 your pdnurr 

W — writes the revised directory to the 

E —exits the directory in memory and 

displays the disk directory 

M - call* up the Copy /Kill menu 

Although B and H. are not displayed, these 
commands are used to.calf.fXFTD and its 
a.ssociated help file if you havL it on the 
disk. : 

The use of file numbers a Mows for h:«uiy 
file manipulations widiout your having to 
cmervariouseori!im;intis-'niis is very use- 
ful if you, iike me. are constantly rear- 
= an^iUij iik> on your disk^, Ofp^rticuiiar 
interest is the Ynnk command which set^ 
youi erase the directory entry of a previ- 
ously killed filel Disk B^sc erases only 
the first letter of the fiteivanie and chaitges 
the FAT (File Allocation Table), Since 
DtR is writing your disk directory to 
memory* you van qibfiek it to ^jj^utc it's 
just like you want before you write it to 
your disk: 

The various command options avail- 
able Vvitlii?//? provide the CoCo 3 user 
wiih a simple, effective and inexpensive 
way to rearrange disk files, as well as a 
qti ick t menu -drt ven way 10 ru n program s . 
f Robert Rnedy, 129 Prairie; Vitikn, fL 
$lti&d-li45 : $9 phtx $395 StH). 

— Robert Gray 
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and Save Money Too! 

For more information see our RAINBOW ON TAPE AND DfSKon the insert in this issue. 



MLBASIC 2.0 - BASIC Compiler 

Ate you tired of waiting for BASIC programs to finish running? Arc you looking for 
faster running programs without having id Icam assembly language? Do you like BASIC 
programming, but wuuld like mure nctubility in writing programs with more functions and 
eapahiUry? If yuur answer is m to any of these questions, or even jf it isn't, MLBASIC is 
the program you should have. 

MLBASIC is a BASIC compiler that converts BASIC programs into super fast machine 
language programs. Ml J1AS1C will produce a stand alone machine language progmn-, rile. 
The program will [hen run by simply using the LOAIXM command. This means no other 
BASIC or runtime programs are required when running programs compiled by MLBASIC 
If you want your BASIC programs to run up to 50 limes faster, or want more 
programming features without learning another language, MLBASIC is for you. 
MLBASIC is the most compatible BASIC compiler available for the Color Computer- 
Wl 1Y? Because MLBASIC fully supports; 

o All available commands offered with normal BASIC, plus more 

All types of I/O (di5k,SCT«rt,priflter,RS232), plus machine level commands 

o Hull floating point arithmetic (same as normal BASIC) 

o All normal BASIC variable types PLUS INTEGER (lo bit) type 

o Allows for .structured programming like PASCAL, C, and FORTRAN" 

MLBASIC atlowi for the first lime user to quickly compile a program using default 
compiler sellings. The advanced user has the capability of controlling over a dozen sellings 
which control where the program is compiled, which media to compile to (memory or disk). 
string space, compiler listings and more. 

"MLBASIC is a fine program for any serious programmer" 
said David Gerald in the December 1987 RAINBOW. 

With all this going for MLBASIC. you might expect the cost Eo be a little out of your 
budget. - NOT- Wc are continuing to offer MI.BASICat Ihc Sale Price af$t9.95 for those 
readers of this month's RAINBOW, But don't hesitate, you can now have a programming 
language thai will spark your ir.iercsr in your Color Computer once again. 

SALE ******** $49.95 ******** SALE 

Add $4.00 Fosrsge and Handling - COCCI 3 with DISK RhiOUIRKD 
Check, Money Order or COD accepted .Foreign Orders use U.S. MONEY ORDERS 

WASATCHWARE 

7350 Nutree Drive 

Salt Lake City, UT 84121 

(801) 943-1546 



Advertisers Index 



Rurkxei Burke , 7 

Chalam House 23 

CoCo PRO! » 

CoCo PRO! 9 

Computer Plus BC 

Dayton Associates 

ofW.R. Hall.Inc 15 

Delphi 27 

Eve rsoft Games, Ltd .. ... .11 

Fama Systems 25 

Gran ite Com puier Systems 19 

JWT Enterprises , 29 

MV Systems 1! 



Owl-Ware 13 

PCM 19 

Raiabow Buck Issues 24 

Rick's Computer Enterprise 3! 

Soft Sector 21 

Suntln^ Systems 5 

Suitdog Systems 19 

T & D Subscription Software 3 

TAD Subscriplion Software 29 

Trading Post 23 

Wttsaichware 31 

Zebra Svslems 7 



r^ 




Q Call: 
Kim Lewis 
Advertising Representative 



'Call: 

Ballnda Kirhv 
Advertising Representative 



The Falsufi Building 

9509 U.S. Highway 42. P.O. Bat 385, Prnspect. KY 40059 

(50Z) 228-4492 • FAX (502) 228-51Z1 

We appreciate your menljoniogth^ rainbow vtften you contact these advertisers. 



HiM'l.l.'U'.'WI 

Introducing A Brand New Product For The COCO 3: 



COCO FRIENDS 
DISK MAGAZINE 




Its part magazine, part 3B5 and part shareware! COCO FRIENDS DISK MAGAZINE is Dedicated 
exclusively to moss wftn still enjoy running their CCCOs under RS DOS! This new product will 
rekjnols the Tire in your COCO computing lile. Articles, programs, opinions, reviews, ana more 
presented in a more personal way tfian yov nave ever experienced before! 

Come and join your COCO mends! Get Setter acouainrea. Share your views and reviews. 
See never-deiore seen programs, grannies, and more! You and your COCO deserve It! 
we'll see that you gel IU 

if this sounds good to you. I invite you to investigate now. Dive in and get ready to have FUN I! 
Send 56.00 {checft. cash or monay arcer} now. Vdu'll receive the COCO FRIENDS DISK 
MAGAZINE STARTUP KIT. Browse this snell and give us your input with the built-in ENTHY 
wasTSR. Made any other contnButlon :n the nature of your original work. Send a copy bat* to 
RICK'S COMPUTER ENTERPRISE and we'll send you me next issue. jTtie startup kit and tfia 
first issue cast amy $6.00) 

if you like what you see, decome a regular subsortber at the raw cost of S30 tor 6 Issues. 1 
It's not tor you..,w=ll that's okay, too. There's no further obligation. I think you'll agree, (his 
is an offer you can't refuse!! 

Don't put it off. Gel in on the ground floor ana neip keep the COCO community strong!! Well be 
expecting to hear from you soonl 

SEND CASH. CHECK OR SAO HEY OftEEH TO: 



RICK'S 



COMPUTER 



TEL; 606.787.57S3 
CODS Add S2.50 

ENTERPRISE LIBERTY. KY. 42539 




BIG SAVINGS on a full complement of radio shack computer products 



COMPUTERS 

Tandy 1 000 RLX HD with VGM-22G 839.00 

Tandy 1 1 1 HD 1 Drive 640K 929.00 ' 

Tandy 1 800 HD 1 Drive 1 Meg RAM 929.00 ■ 

Tandy 1 000 RLHD with CM11 569.00 ■ 

Tandy 1 1 00 FD 1 Drive 640K 469.00 ' 

PRINTERS 

TandyDMP-136213CPS 199.00 - 

Tandy DMP-302270CPS 469.00 

Tandy DMP-202 1 80 C PS 299.00 

Tandy DMP-442 300 CPS 539.00 

Tandy LP-950 Laser Printer 1 299,00 

Tandy DMP-240 1 92 CPS 8 color 399.00 

Panasonic KXP 1 1 80 1 92 CPS 1 89.00 ' 

Panasonic KXP 1 1 23 24 Wlrehead 259.00 ■ 

Panasonic KXP 1 1 24 i300 CPS 329.00 

Okidata32030GCPS 369.00 

Okidata 380 1 80 CPS 24 Wire HD 239,00 

OKILaser4004PPM 679.00 - 

MODEMS 

Tandy DCM-6 52,00 

Tandy DCM-7 85.00 

Cardinal 1200 Baud External 99.00 

Cardinal 2400 Baud External 1 29.00 

CALL TOLL FREE 
1 -800-343-81 24 

• LOWEST POSSIBLE PRICES 

• BEST POSSIBLE WARRANTY 

• KNOWLEDGEABLE SALES STAFF 

• TIMELY DELIVERY 

• SHOPPING CONVENIENCE 



COLOH COMPUTER MISC. 

Tandy Drive Controller 89.00 

Extended Basic Ro m Kit ( 2 8 pin) 19.95 

64K Ram Upgrade Kit [2 or B chip) 39.00 

Tandy Deluxe Keyboard Kit 24.95 

H I- R ES Joystick I nterface 8.95 

Color Computer Deluxe Mouse 44.00 

MuliiPakPalChiptorCOCQS 14.95 

COCO 3 Se rv ice Manual 29.95 

Serial to Parallel Converter 59.95 

Tandy Deluxe Joystick 1 9,95 

Magnavox 81 35 RGB Mentor 299.00 

Mag navox Green or Amber Mon tor 99.00 

CoCo 3 Gime Chip 29,95 

Tandy Pistol Grip Joystick 26.95 

PBJ OK COCO 3 Upgrade Board 29.95 

PBJ 51 2K COCO 3 Upgrade 89.00 

Tandy OK COCO 3 Upgrade Board 39.95 

Tandy 51 2K COCO 3 Upgrade 99,00 

COLOR COMPUTER SOFTWARE 

TAPE DISK 

The Wild West (COCO 3) 25,95 

Worlds of Flight 34.95 34.95 

Mustang P-51 Flight Simul. 34.95 34.95 

Flight 16 Right Simul. 34.95 34,95 

com 



Tandy Educatioal Software 2.00 

Spinnaker Software 2.00 

Max 1 by Co lorware 79.95 

AutoTerm by PXE Computing 29,95 39.95 

TW-80 by Spectrum (COCO 3) 39.95 

TeleWriter 64 49 95 59.95 

TeleWrlter 128 79.95 

Elite Word 80 79.95 

Elite Calc3.0 69.95 

CoCo35l2KSuperRamDisk 19.95 

Home Publishing by Tandy (CoCo 3) 35.95 

Sub Battle Sim. by Epyx (CoCo 3) 26.95 

Thexder by Sierra (CoCo 3) 22.45 

Kings Quest III by Sierra (CoCo 3) 31 .45 

FlightSim.il by SubLogic (CoCo 3) 31.45 

OS-9 Level 1 1 by Tandy 71.95 

OS-9 Development System 89.95 

Multi-View by Tandy 44.95 

VIP Writer (disk only) 69.95 
VIP Integrated Library (disk) 149.95 

Prices are subject to change whtiovt notice. Please can tor 
shipping charges. Prices In our retail store may be higher. 
Send for complete catalog. 

•Sale prices through 8-10-92 




P.O. Box 1094 
480 King Street 
Littleton, MA 01460 

IN MASSACHUSETTS CALL (508) 486 3193 



SINCE 1973 



Tandy is a regigreroa: [raaernark o» Tatty Corp, 



